
LES SUPERS-STARS D'ATARI 
POUR TEXAS Tl 99, APPLE 
COMMODORE 64, ET VIC 20 
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PRESENT, VOIR PAGE 7. 

SOS BUG 



Votre programme est pfante? 
Vous vous etes trompe dans la 
copie d'un listing? Hebdogiciel a 
fait une boulette dans un pro- 
gramme? Economisez des tim- 
bres et du temps! Vous pouvez 
desormais nous telephoner pour 
vous faire aider, pour nous felici- 
ter ou pour nous engueuler (le 
moms possible!). Ca se passe le 
Vendredi. et seulement le ven- 
dredi. et le numero de telephone 
est le 16(1) 577 19 04. de 10 
heures a 18 heures. A vendredi!^ 



INQUISITION 

Mesdames, mesdemoiselles, 

messieurs, chers lecteurs. chers 
amis, bonjour! Comment allez- 
vous 9 Deja en vacances? Mais 
dites-moi vous avez deja un fort 
jolt bronzage, vous devez fester 



de longues heures sur la plage. 
Tiens, j'ai un petit cadeau pour 
vous: vous allez trouver dans le 
numero de votre hebdomadaire 
favori une page qui porte le nu- 
mero 8 et qui va vous etre tres 
utile a plus d'un titre. D'abord, vu 
le format, vous pourrez la depo- 
ser delicatement sur votre visage 
pour eviter le coup de soleil sur le 
nez ou alors en faire un tres joli 
chapeau pour eviter les insola- 
tions ou enfin, remplir le ques- 
tionnaire qui y figure, ce qui vous 
fera passer le temps sur cette 
plage ou les distractions sont 
bien rares et nous aidera a vous 
fabriquer un Hebdogiciel encore 
plus attrayant. Et vous, mon pau- 
vre ami. pas encore parti? Ah, en 
Aout, bravo, vous ne serez pas 
seul sur la plage, vive la chaleur 
humaine! La page 8 peut quand 
meme vous etre utile tout de 
suite: en la remplissant vous 
trouverez que le temps passe 
plus vite et la date du depart sera 
ia plus rapidement. Pas de va- 



cances cette annee? Allez vite 
voir page 8. I'hippocampe vous y 
attend avec la plage et la monta- 
gne. Repondez aux questions, 
roulez la page en pointe et collez 
la contre votre oreille. vous en- 
tendrez le bruit de ta mer! 
Et voila. mesdames. mesdemoi- 
selles. messieurs, chers lecteurs. 
chers amis, la demonstration est 
faite. que vous soyez deja en va- 
cances, que vous vous appretiez 
a partir ou que vous ne partiez 
pas du tout, vous ne pouvez pas 
ne pas remplir le questionnaire 
de la page 8, vous ne pouvez pas 
ne pas gagner une des 20 machi- 
nes a calculer ou un des 20 logi- 
ciels qui sont en jeu. Tous ceux 
qui ne le renverront pas seront 
prives d'Hebdo pendant 15 jours 
et des boutons leur pousseront 
au bout des doigts. fini le clavier! 
Et en plus, ca parait pendant 7 
semaines. y a une page de pub 
derriere pour ne pas mutiler votre 
hebdo. pas d'excuses pour pas 
nous renvoyer ce bon sang de 
questionnaire. ■ 



EDITO 



LES CONCOURS PERMANENTS : 

10 000 francs de prix au meilleur programme CHAQUE MO!S. 
1 voyage en Californie pour le meilleur logiciel CHAQUE TR1- 
MESTRE (Reglement en page interieure) 



Un numero de telephone magi- 
que le 16(1) 577.19.04! Nous 
allons essayer de vous aider: Le 
Vendredi de 10 h a 18 h vous 
aurez au bout du fit un specialiste 
de votre ordinateur qui repondra 
a vos questions sur les program- 
mes, le materiel ou simplement 
pour vous donrer des oonwBi. 
Vous navez meme pas besoin 
d'etre abonne. nous repondons a 
tout le monde et c'est gratuit! 
Quest ce qu'on dit? Merci Heb- 
dogiciell En contrepartie, soyez 
gentils: repondez au question- 
naire de la page 8, et qu'est ce 
qu'on dit? Merci lecleur! 

Gerard CECCALD1 



LAS DU 


VOLANT sur 


FX 702 P 


Un bolide aux prises avec les pieges dune route capncieuse. ou t'appan- 


tion soudaine d un camion qu II faut eviter: du reflexe et de 1 adresse if vous 


en faudra pour parcourir sans accroc le plus grand nombre do kilometres 


possible. Cetui qui aur< 


accompli le plus long trajet 


sans taiKr plus de 2 


fois. sera sacre As du volant. 




A vos commandes! Pre 


Parlez! 


EricDORNE 


VU: 26 PRS: 1688 


,UHT:60IO 15 


291 IF K.Jilf 8-2; 




8 


2ifl=B-2:»!T 5: 


?»■■ 1688 STEPS 


1<8 KEXT 2 


PRT CSS IS'O*; 


18 MIT 9:6010 68 


159 MIT e:C)=":M 


6010 318 


28 1 RS 01 VOLfiHT 


="":I1S=": 0=368 


268 MIT 8 




:P=8:8=«:X=1 


278 6S6 0:P=P«:PR T 




38 * SUR FX-782 (' 


168 R=6.-8=IHT (ML 


tPSICSI -■■!■: 


48 * RERLISE PUR " 


ffl(l)/2»:l«=" 


SR SlVCCSR ft*L 


58 " ERIC DORNE ' 


:V!=V:60T0 26 


EK'.»)-3lMi 


68 Iff THVHHI <1- 


8 


288 6SB 398: IF ll=" 


4!*,N:60TO (H'l 


178 6SB 0:P=P« 


.";60T0 168 


8)<68 


188 PRT CSR 8-lHiC 


298 60T0 218 


?8 PRT "RECORD: -; 


SR E;Vt;CSR fM. 


388 PRT CSR B.*»>1 


Et:"/":J:S010 1 


BKIHiM 


MIT 8:6010 176 


28 


158 PRT CSR flit: CSR 


318 MIT 8:6SB 0:P= 


88 PRt "RECORD: 1 


BiWiCSS R+LEH 


P« v 


Hi'/"it:60I0 1 


(i)-3:D(; 


326 PRT CSR »»1:I:C 


28 


286 6S6 398:IF It=" 


SR BiVllCSR Prtl 


98 PR! 'RECORD: ": 


."160TO 168 


ES(I)-2!M 


6«l"/*;l:S0I0 I 


218 R=tl)HI 


338 PRT CSR fl;*;CSR 


28 


228 IFR>.7;IF AMI 


BlVt;CSR 8tlEH 


188 PR1 "PUREE OE P 


N(t)42(28:8=flt2 


l»-3i0« 


015 Mi". "RECOR 


:MIT 5:60T0 38 


348 6SB 398: IF Il=" 


Di ":Tl;"V;y:t 


8 


.":60T0 166 


-B » 


238 1FR>.64!!F0I= 


356 6010 218 


118 6010 158 


-"iPRT CSR 181" 


368 IF KEV=-"";IF 6 


128 l=" ":»= 


!":6SB 0:6S8 71 


tHLEH<VI><28iB 


8IF0R 2=1 10 3 


8 


*II«£I 


138U=0-2:IFH=2;0= 


248 S=S*l:!F S=0;S= 




Ht|):|="t"<nlD(l 


8:D*="":X=1 


Suite page 19 



DES PROGRAMMES POUR VOTRE ORDINATEUR : APPLE II ET HE 
CANON X-07 . CASIO FX 702-P .COMMODORE 64 ET VIC 20 . 
DRAGON . HECTOR HR . HEWLETT PACKARD HP 41 . ORIC 1 ET 
ATMOS . SHARP MZ, PC 1251, PC 1500 . SINCLAIR ZX 81 ET 
SPECTRUM. TANDY TRS 80 . TEXAS TI-99/4A . THOMSON T07. 

HiPPOREBUS trouvez i eipression qui se cache dans la 8 D de Ihippocampe Oecornpr>s> . n irois Syliabes dan* les trois premieres cases, le tout aevidemmonl un rapport avec I mtormatique 
(solution en page mteneurei 






CETTE CATHERiNE" RjT LA D£.HNi£.(uE FEMME 
HEMChZC 



PETIT ?ERSONNA&e 




CoWTBAlft£rAENT A LA TRADITION POPULAIRC 1 

NesowTPAi _ flfc - — ^TouJooas VETUI 

DC BLANC 1 ... 



Cdnt-«ole: ' 



V IN HTW13 Juillel 1984 J 



Allemagne 3,50 DM - Belgique 55 Frs - Canada 2.50 $ - Luxembourg 57 Frs - Suisse 3 Frs 



ASSEMBLEUR 
DESASSEMBLEUR 



Le Basic du Commodore est rapide, mais dans le do- 
maine des jeux. seul le langage machine est suffisa- 
ment rapide pour assurer ies effets souhaites. Mais le 
langage machine nest en fait qu'un codage de pro- 
gramme ecrit en ASSEMBLEUR, qui lui se pr6sente 
sous la forme d'abreviations anglaises alors que le Ian- 

gage machine est une suite d'octets. 
i'ou I'tnteret de rentrer directement Ies instructions en 
assembleur, plutot que de passer des heures a Ies tra- 
duire en langage machine, avec en plus le risque de 
(aire des erreurs. De plus, le Commodore ne posse- 
dant aucune instruction relative aux graphismes, sons 
et couleurs, i! est beaucoup plus simple de Ies ecrire 
directement. 

Jacques VERT 



Mode d'emptoi: 

Apres avoir demarre le programme par le RUN habituel. et apres 
avoir attendu une dizaine de secondes que Ies DATAS passent en 
tableaux, le com.64 vous afhche le menu: 



A.. ASSEMBLER: 

Vous appuyez sur A pour ce (aire. D6s tors, vous donnez I'adresse 
a laquelle Ies codes en langage machine seront imptantes. cetle 
adresse peut etre en decimal ou en hexadecimal, auquel cas vous 
devrez (aire preceder ou suivfe I'adresse de la lettre H. Note: vous 
pourrez toujours utiiiser soit le decimal, soil IhexadecimaJ. 
Apres cette operation, vous remarquez que lecran est divise en 3 
zones: Ies adresses en decimal, le mnemoniques (instructions en 
assembleur), et I'assemblage. 

Vous entrez Ies mnemoniques. puis vous appuyez sur RETURN. 
Alors, I'ofdinateur va rechercher ce mnemonique. 
Sil y a erreur, le CBM 64 te signal? par un message, puis "ER- 
REUR D'ADRESSAGE': le nombre est incorrect, soit 'MNEMONI- 
QUE INCONNU": erreur de nom. 

Sinon, le CBM 64 "poke* le langage machine et ecrit ies codes de 
I'assemblage. 

On tini I'assemblage (retour au menu) en entrant FIN au lieu du 
mnemonique. 

Notes: on peut entrer directement des octets en entrant: # puis I'oc- 
tet que I on veut entrer. 

Les "," doivent etre remplacees par des *." BASIC Commodore 
oblige! ex: LOAS (FE H), Y donne: LDAS (FE HJ.Y. 
On peut sauter a une adresse quelconque directement, en entrant 
LIGNE + le numero (adresse) ou Ton veut se placer. 
On peut prendre jusqu'a dix caracteres davance sur ce qui est ecrit 
(point tort du CBM 64). 



Les nombres decimaux peuvent etre negaafe auquel cas to aont te 

complement a 256 ou 65536 Ex: - 5 ~ 2S1. 
D. DES ASSEMBLER: 

Apres avoir appuye sur D. I'ordmateur demand* radresae en deci- 
mal oil en hexadecimal, le CBM 64 commence le desassarnblage et 
attend que vous appuyiez sur SHIFT. Vous vous de ma nde * certat- 
nement pourquoi sur SHIFT: cest simpte. en appuyant Sur "SHIFT 
LOCK", on Noque la louche SHIFT enfonoee. ce qui permet de fairs 
defiler le desassemblage et de larreter quand on veut par un nouvel 
appui sur SHIFT LOCK, qurtte ensurte. a redemarrer te astage.On 
revient au menu par La flecne vers la gauche (en haul a gauche du 
clavier). 

S...SAUVEGARDER: 

On frappe S. puis I'ordinateur demande te message que Ton sou- 
haite incorporer sur renregistrement. au programme ou aux don- 
nees (tres utile pour drfferencter les programmes qui en asse m b leur 
se ressembtent tous). 

Ensurte, on donne I'adresse de debut et de fin de ce que Ton veut 
sauvegarder. 
C... CHARGER. 

C, puis I'ordinateur demande I'adresse a laqueHe on veut impt a raar 
la routine, charge, puis amche te message. 
R... RETOUR AU BASIC 

REMARQUE: Lors dun saut relatit (type BNE). on peut sort entrer la 
emplacement, soit I'adresse ou I on dort "brancher". Les codes du 
6510 sont compatibles avec ceux du 6502. En page zero, les octets 
libres sont 251, 252. 253, 254.La memoire bbre est apres te BASC: 
de 18000 a 40959 pour un programme BASIC de 16 Ko. 
Les routines sont appetees par: SYS + adresse de debut, et la rou- 
tine en assembleur revient au BASIC par RTS. apres I'instnjcbon 
SYS. 

Lors de I'assemblage, vous pouvez repeter la derniere instruction 
(un NOP par exempie) en appuyant sur RETURN au taeu de reeenre 
('instruction, ex: au lieu d'ecrire: NOP NOP NOP. taper: NOP RE- 
TURN RETURN RETURN RETURN. 

Attention, lors du chargement d'un programme ou de donnees de La 
cassette a I'ordinateur, il se peut qu'un octet supptementaire soit 
charge: veitlez done a ne pas trop cotter tes routines tes unes contre 
les autres. 



RSSEMKLEi.*'- DES-rtS-SE MRE UP 



SflUVEGflPDE-ENPEOISTREMENT 'DEC/MEX> 



5 POKE 53288.0 POKE 53291. 8 PEM FONPNO I RPRP I EP NOIR 

6 oosub idee 

6 GOTO 3828 

ie REM rtSSEHBLEUP 

n 

38 

40 PRINT'S* •**« flSSEMBLE'JP 6592 44t«" 

50 INPVT-aTSDRESSe DEBUT ", D* GOSUB 7*89 PC- V 

6d PRINT-aaSADRESSES MNEMONIOUES CODES" 

79 PRINT 

tee PRINTPC-TRBCS). INPUTDS IF D*-*FIN- THEN 3088 

183 IF L£FT*<DS.5)-"LIGNE" THEN 8988 

185 IF LEFTKD*. !;•"•" THEM 9708 

118 IF l_EN<D«K3 OR LEN'D».>>I9 THEN 919 

115 GOSUB 9888 

129 FOR NB-8 TO 158 

138 IF LEFT«',rj*.3K>LEFT»fRS*<N8^.3)THEH989 
148 BS-LEFT»CRS*<NB).3» R«-PIOWT*(RS*<NB>.I> 

139 C<t)*CDfNl> 

168 IF fl*0"8- THEN 198 

170 LOI IF LEN<D»<>3 THEN 988 

180 GOTO 2888 

190 IF ft*0"C- THEN 228 

298 LG-1 IF LEN'D»>'>3 THEN 228 

218 GOTO 2888 

220 IF MO-9" THEN 318 

230 LO-2 GOSUB 3599 

240 IF V<-I29 THEN 898 

230 IF V<128 THEM 289 

260 IF W63335 THEN 988 

278 V-V-PC-2 

280 IF V<8 THEN V-V*256 

230 IF v>233 OB V<0 THEN 980 

380 C'2>-V GOTO 2008 

310 IF fl*0"3" OR »IGHT»'D*,3>0-. 

328 LO-2 GOSUB 3688 G0SU8 4888 
330 IF ER THEM 880 
349 GOTO 2999 

330 IF RSO"4- OR PIGHT*<D».3X>"> 
360 LO-2 GOSUB 9698 GOSUB 4888 
370 IF ER THEN 800 
380 GOTO 2999 

390 IF R»<>-9" OR HIDSfDs, 4. 1 ><>"•* 
400 LG-2 OOSUB 9588 OOSUB 4888 
410 IF EP THEM 888 
428 O0T0 2989 

430 IF RSO'-B" OR RI0HTfW.no->" THEM479 
440 LO-3 GOSUB 9699 GOSUB 4199 
430 IF ER THEN 880 
460 GOTO 2990 

470 IF fl*0"6" OP R[GHTfrtl«.2)0".K"THEN329 
489 LG-3 GOSUB 8580 GOSUB 4I98ERDV. 
499 IF v<235 THEN 988 

388 IF EP THEN 889 
318 OOTO 2899 

329 IF R*0"7" OR RI0HT»'D*.2 ■<>-. VTHEM579 

330 LO-3 GOSUB 9508 GOSUB 4108 
340 IF V<255 THEN 988 
338 IF EP THEN 898 
360 GOTO 2898 
370 IF fWO"3" OP PJGHTf'M.Z.'V'.X-THENtie 

389 LO-2 GOSUB 9588 GOSUB 41 <#* 
398 IF EP THEM 988 
699 IF v-'256 THEN Gnrn ^009 

619 IF flIO'ft" OB PIGHT*(D«.2)< •".V'TMEN6?9 

620 1.G-? GOSUB 9588 GOSUB 4108 
538 IF EP THEM 988 
640 IF V256 rHF» Gritfj 2888 
S59 IF MO'l" rip PIf.Hr*'Df.1 ■ 
668 LG-3 GOSUB *588 rrfiQ.lp 4l«Pi 
679 IF W?«-f- THEN 7<*8 
-ftO IF FP THFM »i* 

698 GOTO 



Le 27 julllet, un numero 
quadruple pour le prfx de 3 
numerot. 4 programmes 
par ordlnateur, 64 pages I 
24 francs chez votre mar- 
chand de joumaux. 




COMMODORE 64 



4138 
5888 
3018 
3028 
3199 
3118 
3128 
3200 
3210 
3228 
3238 
3240 
3239 
3268 
3278 
3789 
3299 
3308 
3318 
3329 
3330 
3349 
3338 
5360 



I nnsi.ip 7*88 Pr>> 



THEN439 



1238 DflTHRSL6tE 1 BCC99e.BCS9Be.BEr/9f9.FITl^C.PlT224.»1I938.BME9P8 

1269 DflTRBVC950.BVS979.CLP9Ii8.rLI959.CLV8B8rCrlP9r9,CMPlCri.':MP2r3. 

1 278 DRTflcnP3tJ3 - CMP6D0 . CMP7D9 • CPX9E9 . CPX1EC , CPX2E4 , GPV8C9 , GPY1 CC . 

1 288 D8THDEC2i:6 , DEC5C6 1 0EC6DE . PEX9C9 . DEV999 . EOP049 . EriPl 4P ,E0P?45. 

1298 DflTRE0R533.E0R65D.E0R739. IMC1EE. INC2E6- IMC^F-i. IHT6FE . [Ny8E9. 

1-390 DnTflLSR14E,LSR246.LSRC4fi,LSR556.LSP65E.OPR989,OP«10P.npfl^95. 

1318 I>mnr^lfl3!3.0Pn6]D.0PR719.PHP988.PI.«8^9.Pl.P828.Rni.i2€.P0L226. 

1 329 D8TRRXC2P . POP 1 6E . P0P266 . R0PC6B , P0P376 , P0P6 7E . PT 1 84« . SBT0E9 , 

1338 DHTRSBC3El.SBC4FI.SBC5F3.SBC6FD.SBC7F9.SEP«FB.SEt87e.STfl283. 

1348 DHTRSTR49I.ST8593.STft69D.ST9799.srxi9E.STy2?6.STy«96.STVlBC, 

1359 DfiTHT8>:8Bfl.rflV9fl8.rSK8BH.TXR93fl.TXSft9fl.TS'H898 

2999 FOR fl-1 TO LG 

2918 POKE POH-l.C(fl) 

2829 NEXT 

2838 PRINT CHP»M41 » . "TT 1 . T8B(8) . " ". D« ; TfiP'24i - " r .CM ) . 

2049 IF L05I THEN PRINT "Sr,C<2)i 

2858 IF LO-3 THEN PRINT "IT^CO). 

2060 PRINT 

2888 PC-PC+t-G 

2WQ GOTO 100 

3888 REM ■■■■!■ ii m n FIN ——-.-. — - 

3819 PRINT PRINT"a>FIN P'flSSEMBLfiGE EN".Pp"-1 

3818 REM ••»« MENU •••• 

3928 PRINT-anaVGULEZ-VOUS " 



PPL9I9 
CMP3C1 
CPV?r4 
E0R341 
TNV9C8 
GP8381 
POL 336 
SBC1FP 
STH381 
STV284 



' OS PIGHT«fpt. t l 



■/" (if PIOHTf'P«, | > 



V8LEIJR INrriPPfTFT' 



rHf> !-■.'•■ MMFrnnl'iiF [MTONMJi 



., EHBLEI ■ 



, |F ««. ■■.,■■ QR RIQHTfi HI I i 
718 LG-^ OOSUB 9508 OOSUB 488« 
729 [F EP THEN 888 

OTO i'00^ 
808 PRINT <:hR*'-|4] > . —p" -TftB'21 

;: '--48 OOTO 188 
98» IIF-T MB 
■-in pK inr rwpf- mi . 
Ul ■-..»< noTO i 
. >■ REH -PINO" 

948 POfE 54296. 13 POrt I ! ■' ? ! 168 POKE '<«>?? POKB 54278,258 

. . .. PqkE 34276. i? POKfc 94276.16 PfTiicn 

1888 rem un rim I 1 -! row 

jiiu. PEJi Mn««*u«nnmnHn«n«i> Wf, n- i 

[0; -i DIM 86*' 130 ■ ■' f" 130 ■ 

1830 PPINT'-D.in NOnENT 0VR..." 

1840 RESTORE FOP H-M f0 138 

1830 READ ft« 8S*'Hi-LEFr»'ftt.4* 

1868 NEXT 

1078 RESTORE FOP U-8 TO 158 

1888 PEftD fl» Ci-e.[r. H rs.MS i ■ 

1999 CD<W.'-RSC >:■:*. '-46 IF CI ' 

nee CD'H'-CDcW' + teaffisrf b»>- 

1118 NEXT 
1120 RETURN 

1209 DRTP NOP3E8.8DC069.ftI>r|(;ri.ftcC26'i.8D'"361 .HDC47I .ftpr^^ HW67D'"fOC77S 

1210 DfiTH STHIQD.I.PR8M9 i.riF.i8in.[w,'H*\ i l*i'Mi -i.Prt4B] .1 i«-ip-,.| [iH-.pr* LW7F9 
1228 PRTR LDX0H2.I.DXJ8E.Ll.w^ft6-LPXfiB6,LOX7BE.LW988-Lrivi8r I PV2R4.I PV^P4 
1230 WT8 LDV6BC.RND829,f.NUUli.ftND2-'3.fiNP:'21 .MNP431 8NP3 - ^ . KIJI^ ip . 8ND739 

1240 D8TR CLC8I9.SEC838.RTS868.Jr1P14C. TMPpsc t8R|2fl ftSLlBC .ASL206.R8LC0fl.mH.5U 



i'«».5.1) 
■9-THBM I t"U'-Cf"M'-7 

IFBO-^'THEN Cll<H»"CD'l 




PRINT. "fl RSSEMBLER- 

PRINT . -D. ... DESflSSEMILER" 
PRINT, "S. .. .SflUVEGflRPER" 

PRINT, "C CHflROER" 

PRINT, -aR RE70URMER HU BflSIC" 

OET K* IF <*-"R" THEN 18 

IF K«-"D" THEN 5008 

IF Kf-*R" THEN 6898 

IF Kf-"S" THEN 7898 

IF K«-"C" THEN 7388 

OOTO 3109 

ER-0:IF V<8 THEN V-V+236 

IF V>235 OR V<9 THEN ER-1 

C<2>-V:RETL«N 

ER-O^IF V<0 THEN V-V+65536 

IF V>63333 OR V<8 THEN ER-I 

C(3)-INTCV/236) X<21»V-236»C':3> 

RETURN 

PRINT-^a •••• DESflSSEMBLEUR * 

INPUT-aWDRESSE DEBUT DESflSSEMRflGE* 

PRINT-SBPRESSE MHEMONIOUE COPEa- 

PRINT PC.TRBC9>; 

FOR fl-8 TO 138: IF CP<fl>-PEEK(PC) THEN 5288 

«XT:L0-1 :Ft-""-?"GOT0 3399 

RS-RIGHT»CflSS(fl) . 1 vp«-LEFT«(fr>:t<A>.3> 

Vl-PEEK<PC*l>-VH-RIOHT«CSTRt<VH.LEN'STR«<Vl>)-t> 

V2-PEEK(Pi:*1)»236fPEEK<PC»2» V2f-RIGHT«(STRf(W?>.LEN<STR*rV2))-l> 

IF R*-"0" THEN F«--a**VUL0-2 

IF flS-'l" THEN Ff-"«-*V2* LO-3 

IF RS--2- THEN F»-"Z"*VI« LG-2 

IF flS-*3* THEN F«-"»("*Vl«*".X>"L0-2 

IF RS-"4" THEN Ff-"*< **Vtt** > . V" LO-2 

IF ftf--3- THEM F»-*Z**V1»*".X-:L0*2 

IF R»-*6" THEN F«-"*-»V?»*-.X- LO-3 

IF ft»-*7" THEN F»-*«-*V2*»--VLG-3 

IF ftl-'B- OR flf--C THEN PS--" LO-l 

IF RS-*R" THEN F«-'2-*Vl ••- . V* XG-2 

IF (*»•"»- THEN F««"*("»V2»*-»-Lrw3 

IF RfO-9" THEM 3398 

t 0-2 IF VflL'V1IXI28 THEN F«»" *-*V1« 

IF VflL(Vlf>127 THFN Ft-" "♦STB*<-t*<256-VRL< VU> > > 

5490 

3590 IF F*--"^- THEN PRINT ->->■>• . 

3318 IF F«0*??->"TNFH PPINT P#.F». 

5528 PR I HT TflBt23> - " l".PEEK(PC> . 

5538 IF L0>1 THEN PPtNT "«" Pf E1"PT*1 V 

•^548 IF LG-3 THFN PRINT "IT .PEEK' hi ♦,' I 

5358 PC-PC*LO IF pns(8>'">fl THEN PPINT CHRfri41>i 

5568 IF FT£EK<653>01 RNP PFEK' \<>? >- '^7 THEN -."«.» 

5578 IF PEEm°7>=37 THFN 3«?8 

5388 GOTO 5198 

6899 PR I NT" •a**/!'* fS REVEHE2 RU CONTRfM E PR^iri" FNP 

6998 REM CBM-64 -> MHONETn 

7888 PPINTT1S SflWEOtiRTC ■" 

7885 INPIIT"MFSSfl-iE " . MM$ 

781R INPirT-flpPF-'^F pfPin ".r-t ■ .' «-< m -■•""^ m<-» 

7828 INPUT" FIN "-H* r.n^iip 7n«wFl-v 

7838 IF FK-PB THFN PR INI" DEBt it*TlN i " ■ nn<i ip ow nmn 7* 

7840 OPEN I ,1 . l.-LH" 

7P5H PRIHTtl .NM« PRINT II .F I-PP 

7180 Z"PEEK(0B)*PEEK<D8+t>«23« tr 7 ■ W*71MFH 7-2-65336 

7183 r/.-7. PRIMTtl VA 

7119 DB-DB*2 IF PP'=F1*1 IHFH /I On 

7128 CLOSE 1 GOIO 3828 

7498 REM MflfiNFTil -'• I RM 64 

7590 PRINT -na ENPFGlSTi^MI-NT •" 

7319 IHPi.rT"«8PPE c .^F. tiF.pi IT ';DI OOSUB ■'■ 100 PP-" 

7348 OPEN 1,1 .9."LM" 

7530 INPHTai.HMI INPIITdl -l li FI»PP»|r. 

7368 INPUTil, 7V. 7-27. IF 7'0 THFN Z^S336>; 
POfE DB*1. INTC2/2V-- pr*IE HP -r-/56«PEEKl IIB*1 ) 
TJB-DB+2 IF TJ0/-FI THEN Wfl 

CLOSE 1 PPIHT'-iwiifs^mi"^ " PRINT MM* rrfirri W20 

REM HEX OU PEC - ■ r+r 

OOSUB 7998 IF tCX-H THFN V-«Rf1H' 

IF HX-1 THEN V-VH 

RETURN 



per 888 

CMP4D1 

tEClCE 
E0R451 
PHR848 
0PR4U 
R0L63E 
■SBC2E5 

STV594 



D#b< 
REM 



• lit 



RECHERCHE D'MFXfl 

REM rHEPCHF IIN H 

FOP R-4 TO l.ENCfJtJ. IF MIPt'PIM. 1 --"H 

NEXT HX-9 PEIliPN 

HX-1 VH-8 

FOP B-4 TO 1FN'P«' C»RSf 'MIPKP* . n. 1 I) 

IF CC>47RNDC."'«> OP rr.^4ANDr<71 i THFN GIlSllp (tpiW 

NEXT HX-I PETKRN 

VH-VH*16K-4«*/#'OK4> PETIWN 

REM VRL 3 

V-V«.<MI0»rpt.3" IF HX-1 THFN 

RETURN 

PEM VRL 6 

'-VRL<Min*iT'».6> • IF HV-1 TMFM 



MM pnMH^'- I" Ht-*n 



V-^*H 



V-VH 



re niPN 

REM DONNES PIPErTES 

E«-PI P«-Min»< n»2> nrrsiip 78«n 

IG-l 008UJ 4080 IF KP-l THFN RB8 

Cft'-V Dt-E« OHIO 2898 

REM SRIJT R l»# I |ONJ 

PI-MIPt'I'» ...• 11 llM'P*'-0 (MfN '10 

ni-" "+P* (.osiip 7R(w pr»v print r.nro i» 

PEM ■■■«■■ »>— —————— twmmm 

REM /i«if 1 ll^Pfc pr»ip LBS PpnnpHMMFS 
PEM — -. 



A/F. 



VIC 20 parte francais. onftn! 



Le 27 |ultlel, un numero 
quadruple pour te prlx de 3 
numeros. 4 programmes 
per ordinateur, 64 pages! 
24 franca chez voire mar- 
chand de Journnux 



Carol LIMBARD 
Mode d'emptov 
Pour uWtser ce programme il suffit de laper au clavier 

■ SYS 23427 pour obtenir la version fmnceJse 

■ SR 23456 pour relourner a la version anq 

Ci dessous, traduction des mots cies (ANGLAIS FRANCAIS) 
END FIN. REM: REM, SYS: SR. . FOR POUR, STOP STOP 
OPEN OUVRE. NEXT REPETE, ON SELON. CLOSE FERME 
AND ET. DATA: INFO. WAIT: MEM. GET: CAPTE OR OU 
INPUT* ENTRE* . LOAD: CHARGE, NEW RAS. - > INPUT 
ENTRE. SAVE SAUVE. TAB( CUR(, - , DIM: DIM VERIFY 

RELIT. TO. A. < < . READ LIT, DEF DEF, FN: FN, SGN SGN 
LET VAR. POKE EMEM, SPC< ESP(, INT ENT, GOTO VA-EN 
PRINT * ECRIT # . THEN: ALORS. A8S: ABS. RUN: FAIT 

PRINT ECRIT. NOT. NON, USR SRU, IF: SI, CONT CONT 
STEP PAR, FRE MEL. RESTORE: DEBUT. LIST: LISTE • 
POS POS. GOSUB SP, ClR: EFV, - : - , SQR: RAC RETURN 
RSP. CMD: PN. ■ : ' . RND: ALE. LOG: LOG. TAN: TAN. STRS 
CHS . LEFTS GAUS . EXP EXP. ATN: ATN, VAL: VAL. RIGHTS 
DROS , COS COS, PEEK: LMEM. ASC: PSC. MIDS MILS SIN 
SIN. LEN LONG. CHR$ : CARS . GO VA 

les messages d'erreur sont aussi traduits Seuls quelques mots 
comme BREAK. READY, n'ont pas ele traduits parce qu'il sont diffi- 
cilement accessibles. 




60 Nt-24233 ffErt DEfc.iT , c, 

69 t*«D«« IF«*""F'TM6NPOKenC.e o 

79 FOSO-iTiXENiAa. IF(M.EN<ft«>T»CF«>QKEHC.A8C<niCS(M,0» 

73 PVEHC-«SC<niDtfft*.O.I>. r»>K 

38 NEXT G0T065 

33 ME-23731 SEN Itei.iT MES-JflOES ERRE*KK 

86 vE-23728 WH D6BOT VCCTEUR8 rCSSAGH EPPfi^s 

90 fi^BUflS iFftS-"F"THeMJ'i*< 

93 PWEVE-f«-2WaiHT(n6/i«> PC«EvE*l. INT<HEV2^fi ■ V6-VE+ 
108 F0RO-iT0LEN*fW- [FO^E»<R*>T«ff»0KEfC,Ft8C<WC«<RS.Q) 

l« POK6nE.3SCftID»(flt.0.1i> *£•«•! 
110 NEXT G0T099 

us 



i .:- n ='■■ -■ 



V\C20 



H28 me=me»! 00T01 |fl 



120 -_23654- DEPUT 

_23638- DEBUT 

2343?- DEBUT 



ROUTINE LECT. 
ROUTINE IWP. 
ROUTINE COW. 



NEW DOS 



Un DOS sur mesure! Fabriquez le vous-meme. Prati- 
que, rapide et efficace. 

J.P.PRUN1ER 

Le programme qui permet de changer le dos 3,3 de lApple a sa 
facoo. trois possibilrtes: 

- Reduction a N lettres: toutes les instructions du Dos seront redui- 
tes a n lenres (mini 3) 

■ Voire Dos: vous choisissez I'equivaient de chaque commande. 
tapez RETURN quand !a commande specifiee reste inchangee. 

- Dos normal: Dos de I' Apple. 

Apres avoir choisi votre Dos. n'oubliez pas de le sauver afin de 

pouvoir le recharger directement plus tard. 

Lots de la demande des commandes du Dos, tapez F pour FIN. 



Le 27 julllet, un numero 
quadruple pour le prix de 3 
numeros. 4 programmes 
par ordinateur, 64 pages! 
24 francs chez votre mar- 
chand de journaux. 



APPLE" 




20 


REM 


300 


POKE AD B 




590 


END 






AS ■ AD + 1 




hZO 




SO ftl> - 43140 






* TABLE &E5 ORDRES « 






S70 


GOTO 9'jO 






* ORIGINMJX DU DOS ■ 






r,. ■■ , 


RET) VOTRE 


DOE 


6*0 

*so 






01/06/ 


DATA "INIT", -LOAD". "SAVE". "R 






HOME 


















VTAB 10 


407 


f! - 






, "READ", "EXEC", "WRITE" 


220 


PRINT "I. .DOS REDUIT A n LET 


4 tO 


FOR I - 1 TO NB 






DATA "POSITION". "OPEN", "APPS 






41S 


*EAD Aft 






HD", T-ENAME", "CATALOG" 


229 

230 


VTAB \Z 


1 . - ■ 


A - LEN !A»J 




670 


DATA "MON","NOMON","PR»"."IN 

•". "MAXFILES", "FP" 

DATA "INT", "BSAVE". "8L0AD" . " 


oos- 


PRINT A ■• &'■ LETTRES DE DISR 


ftao 








ONI&LES" 






BRUM', "VERIFY" 






430 


INVERSE : PRINT 
NORMAL : INPUT 










T1AL" 


a* 


690 










VTAB 19 


4:5 


IF &ft - ruEn 


Bft * Aft 


/. ,■, 


REM TABLE DU DOS 






440 


C - LEN (S*> 

JF C A * B TM 




710 
715 






DOS- 


N 423 


HOME 


2SO 


VTA6 22i PftiNT "5 


4^3 


b - A - C 




1 20 


FOR I - I TO NB 




SAUVE GAP DE" 


4SO 


FOR J - 1 TO C 




740 


J - 1 / 2 


';:; 


VTAB 23l HTAB Zt 


4SS 


Cft - MID* (Bft.J 


1» 


750 


VTAB ( INT <J * .5)) 


BET A* 




D - ASC ICfti 




760 


HTAB 1 


2*0 


1 F A* '■ 1 - AND A» ■: * - 


465 


IF J - C THEN D 


- D • 128 


770 


IF INT IJ) - J THEN HTAB 1 




-," A*K> Aft - j ~4" AND Aft 


470 


POKE AD.D 






2 




-2" AND A* ' , "3" THEN 


47fl 


AD * AD ft- 1 






A - PEEK (AD) 




pfINT CHPft <7>: GOTO 233 


460 


NEXT J, I 




790 


PRINT CHR* (A'i 


273 
Z0C 

2*9 
JOO 
SOI 


A - VAL (A*) 


499 

900 


GOTO 900 




BOO 
BIO 

B20 

09'j 
900 


AD - AD * 1 

N - 129 THEN NEKT I: GOTO 
900 
GOTO 7B0 

REM 

REM OCT 





REM DOS INITIAL 


ftErl REDUCTION DOS 




HOME i RESTORE 
RESTORE 








302 


HOnE : VT.AB 3 


S07 


VTAB lO: PRINT 


TRAVAIL EN C 


rto 


REM 


304 


RESTORE 




OUR" 




92i i 


VTAB 2;: H7AB 39 


306 


INPUT -MQMBRE DE LETTRES MAI 


SJO 


FOR I - 1 TO NB 




'/-■- 


GET Aft 




I : "111 




READ Aft 




940 


IF Aft - "F" THEN 570 


307 


IF ft < 2 THEN 30* 




A - LEN <A«> 




745 


(»OID 20 


EOS 


VTAB lOt PKlNT "TRAVAIL EN C 


923 


FOR J - 1 TO A 




94B 


REM -- ■ 


109 


OUR" 

F - n 


530 

S :■- 


Bft - MID* (Aft, J 
b ' ASC <&»i 


" 


\ . 


REM 9AUVEGARDE 






JIO 


FOR 1 - I TO NB 


540 


IF A - J THEN b 


- B * 12B 


■■><■■ 


HOME 


ill 


» • F 


950 


ROfE AO,B 




ft/70 


PRINT 1 FRINT "HUM DU 1-lLHlt 


SIS 


READ Aft 




AD - AD * t 






R I "li INVERSE . INPUT " "1 


:;o 


A ■ LEN (Afti 


9*0 


NEXT J, I 






Nft: NORMAL 


71 


IF A H THEN F1 - A 


S65 


GOTO 890 




--(;, , 


FRIW1 i iiiFur "COWIANDI ■■ ■■ 




FOR J - I TO M 




VTAB 201 MTA& I 






vE' -"ib» 


I 3 


b» - nlDft (Aft, J. ! . 




r-PifU ■ .- .. 






PRINT CHFft l4»b»Nft",A*Aft»4, 


US 


& - asc <b«i 


980 


PRINT CHRft 17) 








too 


IF M • J THEN & - & * iUB 


.';'. 


VTAB 20 




995 


GOTO 20 1 

3 



]»> RJ>23487 BEM"DEH/1 

133 fPEROA lFfl/>-ITMCNPC*E*<[''R RD"R1f*I ■ I I 

-.....:■ 

999 REM" TRPLE PE« H0T! 



l0MjmASW,ftOT.nBS'MUrfEL,PQt H ■ ■■ 

1940 DRTncRM.ORUf .Omi.niL*-VA,P 
1343 

1344 P£M" TABLE HESSflOEl D ERSEUK 

104? DAIRFICM. tbop NOHBfKTLM.FICrilEH OUVEJn.FICHIER MOM ■ - MOM TPO«Jv 

1030 DfiTHPERlPHEPiniiF HBSENT,F1CH1ER EH SOSTIE.F'ICHIES EN EMRE1 

1360 DRTRMI.IM. PEPt. ILLEGAL frEPETE 5RHS POOP BVNTRXE PS/P 

1070 r DRTRGlijR HTITE ILLEORLF-r'EPA^EMENT.MEMfjlPE PLEIME.INST. WW ?EFINf E .M«7VRIS 

1090 DRTflREDIHEH?irjHNEHEHT.ri[vi«.iriM PAP ? E po. at - FrJ iir.pE PIRECT.COMFUSIOH nu/al 

1090 ORTRLGN15. ''RRIRBI.F >233.FICHIEP EWNMEE? - -■ 

1130 PATRFOHC. HON DEFINIE .VEPJF tCATir.-i ■■ 
119S 

119? PEM" ROUTINE RCTIVft. FPRHTHIS 

IS03 Dfl7R169,92,141. 7. 3. 141, 1,3. 169-193,141, 6,3 169 "■ 141 ■"< >, 169 191.14) *.' i 

1210 DRTR141,3.'3,96 
5 239 

1299 PEM" Runtime 

1300 DHTR163. 38-141, 0,' 
41,6.3 

1310 DRTR169.I99.I41 ,7. 
1498 
1499 PEM" ROUTINE 



/ 



CODflOE MOTS CLE? 



DhTR166, 122, 160-4. 132. 15, 169.0-2. 16#7. 291 ZM ?4e,62-232 ^c* ?44,?«] 3? 24« 
.53.13? 

1353 DrttH£.20i.34.240<86*3£.IS,112.45,20t.63,2e9.4 169 133 JRft-37.201 40 ;44.4.2 
01.63 

1560 WTfll44,29.132. 113, 160.0.132. 11-136. 134. I22,2e2.2ee. 232. 199 9-2 ** ?49 i 72 
94,249 

1370 DRTR245.291. 128-298-48. 5- 11 ■ 164 . 1 1 ?■ 232 ?*» . 15S.251 . ] ■ 1&5.231 .1 .249 "4 56 v 
33,33 

1530 0HTR240,4.201 .73.20R.2. I?"'- r. 5«. 2-^.ft<..>*s i«,i i . ■- . .-..- ;-/ - 

.240 

1593 DHTfl219.280,l53,2Sl. 1-232.288,249. 166. 122,230-11. 290. 185. 171 94.16 238.(83 
172,94 
1633 DRTR23?. 133, 139.9.2. 16. 190, 153.253. 1 . <98 123- 169.233- 133. 122-96 

1999 ■ 

2000 PEK" ROUTINE METROES D'ERREURS 

2019 rjRTR138-13.170.i39. 166-92. 1^'. 34. jm. \A?.?2. 13*. 35. 76. 71 .196 
2320 

2939 PEM" ROUTINE LECT. PFi MOT'i ' i £c. 

2943 PRTfl76-243.r--3.16.2 ,: ;i .281 .235.248.247, 36, 15.48.243.5« 
0.0.200 

2959 DftTfl298>6. 238.134, 92. 238. 149-92. 183. 170. 94 II ' 
,149,92 

2960 C8TR135. 179,94. 16, U . 169.94, 149.134.92 140.148 92 



CLAVIER 

AUTO 

REPEAT 



Cette routine en langage-machine transforme le clavier 
de votre dragon en un clavier Auto-repeat: maintenez 
une touche enfoncee (environ une demie-seconde), et 
le caractere se repete a I'ecran. 

G.PASSET 

Cette routine lonctionne aussi bien en mode direct (programmation] 

que sur une commande input ou line input. 

N'oubliez pas de reserver I'emptacement 195 octels en haul de la 

memoire avec le Clear 200. el H7F03. 

Atlention, cette routine est prevue pour fonctionner avec le Dragon 

Dos. St vous n'avez pas de disquette, modifiez la ligne; 5020 DATA 

BD.D7.20. qui provoque un saut dans te Dos, par la ligne: 5020 

DATA 12,12,12. 

Apres execution, vous pouvez effacer le programme par un New. 

mais ne modifiez pas I'adresse haute de ta memotre (& H7FD3). 




Le 27 julllet, un numero 
quadruple pour le prlx de 3 
numeros. 4 programmes 
par ordinateur, 64 pages! 
24 francs chei votre mar- 
chand de Journaux. 



o^ G 



b** 1 



59 CLEAR 290. JH7F7D 

SB ' RESERVE ESPACE 

7B ' POUR ROUTINE 

100 PC-IH7F3D 

HE READ Oft 

128 If Oft-*FlN" TMEN 1000 

130 Oft-'tH-*0* 

I -.a Q-VAL(Oft) 

130 POKE PC.O 

160 PC-PC* 1 

170 GOTO ue 

1000 • 

1010 • FIN CHORCEMENT 

1020 ' ROUTINE 

1030 ■ 

1B40 UEC'iH7F3D) 

1030 ' MISE EN ROUTE 

1060 ■ CLRVIEP- AUTO-REPEAT 

1070 END 

seee • 

3002 DATA BE. 7E. 7F 

3004 DATA BF.0J.B2 

3006 WR SE.49 

3006 DRTO B7.S1.S4 

3010 DATP, 39 

3012 DRTR 32. 62 
301 t DATA 20,03 

3013 DATA BD. ftfi. 77 
3020 DATA BO. 07. 20 
3030 DATA 0F.S7 
3*W0 DATA 8E.02.OD 
3030 DATA Cll. 91 
3060 OATA 80.31. 12 
3070 DATA 00. 70 
30B0 DATA 26, 28 
3B30 DATA 00. tf 
3100 DATA 26.23 



3120 
3130 
3140 
3130 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3240 
3230 
3260 
3270 
3260 
3290 
3300 
3310 
3320 
3330 
3340 
3330 
3360 
3370 
3300 
3390 



3A30 

3440 
3430 
5460 

3470 



DATA 81 ,0C 
DATA 27. E4 
DATA 81.00 
DATA 26.07 
DATA 3A 
DATA 27. E0 
DATA 30. IF 
DATA 20, 34 
DATA 81. IS 
DATA 26. 0A 
DATA 3A 
DATA 27. D3 
DATA 86.08 
DATA BO. B3-4A 
DATA 20. F6 
DATA 81.03 
DATA 1A.01 
DATA 27.65 
DATA 81 ,0D 
OATA 26. 0D 
DATA 4F 
DATA 34.01 
OATA BO.90.A1 
DATA tf-.FJf. 
DATA BE. 02. DC 
DATA 33.81 
DATA 81. 20 
DATA 23. BO 
DATA 81. 7B 
DATA 24. B9 
DATA CI, FA 
MTA 24, 83 
DATA A7.B0 
DATA SC 
OATA BD.B3.4A 
OATA 20, AD 
DATA 34. 12 



3488 DATA 8E.0 
3483 DATA B6.F 
5490 DATA A7.9 
3300 DATA BC.0 
5310 DATA 23. F 
3320 DATA 33. 1 
5322 DATA BO.0 
3324 DATA 0F . 7 
3326 DATA 0D.6 
3328 DATA 27,0 
3338 DATA BO. B 

3332 DATA S4.9 
3334 DATA 39 

3333 DATA 34. 1 
333E DATA BD.8 
3538 DATA BO. B 
3542 OATA 33. I 
3348 OATA 26.0 
3330 DATA B7. 7i 
3360 DATA 7F. 71 
3370 OATA 39 
3571 DATA 34,4 
3372 DATA C6. 61 
3374 DATA E7.9I 
5375 OATA 33,4 
5SB0 DATA Bl. 71 
3S90 DATA 26. El 
3392 DATA 34. ft 
5394 DATA F6. 7J 
3396 DATA CI. II 
3399 OATA 33.0- 
3610 OATA 22.9- 
3620 DATA 7C. 71 
3630 DATA 4F 
5640 DATA 39 
:-0000 DATA '"IN 



INVASION AVANT L'AUBE 



Atterrissez sur la planete sans accrocher le champ de 

force, detruisez le generateur des rebelles apres avoir 

traverse I'almosphere, el, vous gagnerez ainsi I'estime 

eternelle de la confederation , Le tout dans un temps 

imparti, sans oublier de surveiller votre Vitesse et votre 

carburant 

Ce jeu est totalement compatible OR1C1 et ATMOS. 

Pierre BARUSSEAU 



7 pfM TirPE 

-.: HIRES PARER6 If* i pRIn 
■■•■ * ; PRIHTCHR* -. i 
18 FORI-1TO40 

1! CUtSETl, 139*1.3 fIllli I* CURSETI 
''- : ■ ■ ."■ I J9+1 3 FILLI : 22 
• 
*SETI 178 3 FILL22 
13 CVASET38 & ■ 

.*■ 
18 FQR8-1T0LEWCS. 
1? rHflc-- : ■■-:: t • l 
20 CUR*" ' ■ 

22 HEXT8 

2* CUPSET9.92-3 FILL2011 

29 CURSET190 3 -FILL29.! 29 GO3U8330J0 

26 F0PI*lT0ir 

27 PQKE47469M8II.3 POKE«8268+401 1 .2 

23 NEXT I 

32 FORtj-lTniR 

35 cue$ET2oe i-^i .5 ... ircleu i 

36 WAIT29 
■ 

38 GOS JB2&9Q ,'. 3U829S3 

48 PEN MENU 

4i rem 

42 TEXT CLS CLEAR P0KE6I3.2 

43 PF*>EP2 INK I 

C "P* - 1 2 > 
50 PRIN7CHR»<4>,CHR»<27>,"J 

»t SOnnflIRE W" 
53 PPiNTfrne* 4 ■ 

56 PLOT0-5-29 PlQTO.10,0 PLHTO 23 ,28 

PL0T3. I! ■ ■■■ ■ ■■ —« ■■ ■ 1 ■ !■ ■ ■ — ■ 

57 PRINT PRINT PL0T8.11.4 

68 PRINT PRINT PRINT PRINT PRINT 

62 PU0T18.15-"- SCENARIO 

'S3 PL0T18.I7,"- COWHANDES 

..2- 

65 PL0TI8.1? -- DEBUT DO JEU 

..3" 
67 ■P1.0Tt8,21,"- ARRET OE LA PAPTIE.. 

..4" 

78 INPUT" - Votre choiy 'VVC 
88 IF VC-ITHE"'?? 

85 IFVC-2 THEN5090 

86 IFVC-3 rMEN299 

98 IF VC-4 TWEH3O900 
95 GOTO40 

37 REM SCENARIO 

38 PEN 

93 CLS PPPEP0 [NK3 

188 prinTCMRV 12 

182 printchrs/4 ..cmr»',27>," j 

PRESENTATION -" 

184 PLCT9.1-6 PLOT9.2.6 PL0T9.3.6 PLQ 
T9, 3,19 PR IMTCHR*' 4 > 

185 PRINT PRINT 

118 PPIMT"D*Puis Plu»l«urS mo»s,I*s f 
o^cts •*<&*! l*s blo4u*nt I* asstw 

128 PRIHT"Oth,c#M*«Tit d» 9r*nd*s P#rt 
** M comiois d* i» conf*<fer*t,iOT) 

125 PPINT-IJr,? Ktion # done *>.* decid 
** COT*r* l* b»i» r*b*ll* sltM«* %nr" 

127 PRINT-l* Petit* HiMt? SNllxnt * 
n Bflr*ir* <*j mtfM" 

128 PRINT 

138 PRIWVotr* minion consist- * vo 
tu Poser I? Plus r*Pl<Mmrnt Possibl* 

135 PPIHT*»fin d* Pr-*ndr« P*r s.jrPns 
* 1» 9rnt- rrtwr d* c*n*r»p d» foi-c* " 

148 PRIHT"4wi Prot«9t I* tUwtf ,8«r 
vtffll«Z votr* Vitesse ft I* eartovri 

145 PRInt-Vo'ps Powrez Hnsl evtttr 1 

;so PfflMT"* rous N«lnt«tMlTlt d* f»ir» 

Prtuv* -J* C*l*w ^* r i= ■'-*:".'» ■' 

[68 PRINT PPIIITCHPV27 -."ft BONNE i;MfflJ 

, :E . Ef soh DEfiflROiJEMEHT. . . " 
165 PLUT8246 P1.0T8. 26. 13 

178 CETP,* 5QTQ49 

jTge REM HIVEW PE WFFinjLTF 

218 REri — 

211 TEXT P9CE6I8.2 

212 H-8 
215 CU 

228 V»1 FflPOM 

M-1T048 
225 PRINT PRINT PPIfir PftJNT 
ggg prihTCHR* 12 ■ F^Inr-;nR«' i >.rnp»- 2 
7i- "J MIVEW DE OIFFICIJLTE" 

■ pf EMTCMP* .i i 
.-- pffim ppiht 

PI '19TQJ 3TEP-1 

245 PRINrTHp- 24 ■ I 

248 PRINT 

258 IIEXTI 

252 FORI-1 r028 

--■■: 48212+1 <!>i [- POW i- •: 148 



N 20 
338 GEIM 

)48 [F/W-CHPW 3 )*WDW^ 9 rHEMW ' : 
■ 

[I .... CHRf « ■ rMENNi M*] 

0409 

■ HCW*<9 !i0rO2I5 
■'-0268 
408 RE« INITIALISATION-— 

410 REM — 

412 PAPEPt. PPIHTCHP*' 17 ■ 

428 CLS 

438 HIRES Pt>E-;i5. E 

433 FORI' ■ 

448 ET ■tNT' <-■<'■■ : •:■■■- ■•■ 

450 IT »HIT' PMO* i 1*196 "I 

4^0 CURSCTET ■ IT .3 DRRU8. 1 1 

4 78 MBCT] 

475 IMP-'ii I2880XH titiT.-f.-u-' ! 




Le 27 juillel, un nurrttn, 
quftdruple pour !* pr!* dt 3 
num*ro». 4 pfOgramm«« 
par ordinateur. sa ptgej* 
24 francs cfw votra m» f - 
cnand d« lournau*. 



430 T-8 PTS- 18808 Ti*V 

490 M = 'N flOO880 

508 VI T— 258 

510 FORI-ITQN 

515 VIT-VITt2 

520 ME.VTI 

530 F« 3?O0*' 1300W ■ 

540 COSUBtOOO 

568 F0PE»1T0INT< t0'M >+I 

570 CURSET128 . 85, 3 CIRCLE ItJT' E H I , I 

588 NEXTE 

590 FORPi a iT0INT'5^N >*1 

608 CJPSET39.6Q.3 CIRCLEINT'FI >+l . 1 

610 NE/TFI 

611 GOSIJB2888 COSUB2053 

612 E»INTU8'N>tl 

615 C0T0718 

616 Y*180 

61 7 REM 

620 D68««2*FU>-168V2 

639 VIT=VIT+DE3 Q-' IWVITHDCS 

640 015-DISt-G 

650 T"T+3>PTS^>TS-T»-nfl+B0 
655 IFT>2!8-1 I9*H >THEN1488 
668 IFPT5--0THENPTS-8 
638 [FOIS<-IMP*4088+<H »590 'THEN OOSU 
82500 

700 IFCIS- = lriPTHEHr;nctj B gg(i| 

783 IFVIT>30008OTHEN498O 

718 COSUB1800 

720 F-F-FiJ-MR-ferj 

730 GOSUBI508 

735 GOSUei208 

740 IFF<9rHEN GOTQ308 

?45 TP=TP+TN 

748 IFTP^8THENTP«0 

750 IFTP> 680THENfjQ3'JB4590 

769 GQT0629 

898 PEM IMPACT CF 

810 REM 

815 GOSU0320 GOTO 18800 
320 CLS. 

822 FORI=1T016STEP4 

323 P0KE47329*' 1*40), 13 PQKE47880-': 1* 
49J.I3 
824 NEXT I 

830 POKE49009.I7 P0KE43849.I7 
835 PRINT" s/s ssv 

340 PPIHT" //S/ IMPACT \\ 

850 PnKE4?802.0 POKE43042. 7 WAIT299 

860 FORI-1T019 

379 POKE43882.0 POVE43042.7 SOUND 1 • 78 
8.12 

875 WAIT50 

389 P0KE43092.7 P0^E49942,9 ■ SOUND 1 . 10 
9.12 

335 WAIT59 

399 NEXT I 

392 PLAY0. 9,0,0 

395 RETURN 

388 PEM PANNE 

985 PEM 

986 GOSU6910 GOT0339 
919 CLS 

915 POKE49000.22 PQKE49040.22 'PING 

329 PPINT">.. Confol* P-*^f.*i;r t Post 

* d* " 

930 PPIHT" Pilot*?* 
'.<■■ 

932 POr-E49801.9 P0r , E4?O41.0 

933 WAIT489 

936 CL3 

937 POKE4380822 POKE4904O.22 

933 PPIHT" >p nous vo'vs zi9n»loris qy» 
I* cartw-" 

949 PPIHT" .-•nt «st -PijiS-... 

?4i P0KE49991.8 ROKE49941.0 

942 WAIT4O0aS 

943 P0KE43939. 17 POf £49048,17 PIHG 
?44 PRIHT' •> rjrdin«t*ur d« Bord,* Pil 

r.4z pci,, j- rRRJECTOIRE ItCOHTROL 

LEE '" 

346 P0KE49881/8 F0KE4?84| -0 

?47 FQPI^ITOIO 

948 POVE49041.O UAIT50 P0KE4?94[,7 LJA 
IT50 

349 RETURN 

950 CLS 

951 DES«<-'1«8*N;) yiT-VIT+D£S 

952 OI8*V[T+0£3 0I8-DI8*C 

•' li-TCi-IMPTMEHSOe 

«4 [Pr.ii. ■1O9O09OTMEH989 

956 IF 7IT;380909THEN49O0 

957 r-T+5 IFT:.210-'10«N.THEH149O 
^8 rp=TP+20 IFTP ■699TMENGCri'je4500 
?>:o «rgye788e 

379 G0T0958 

980 REM ELOICWEHEWT - 

381 REM 

933 PTJKE4S«40, 18 PPIHT PIHG 

934 PPINT-.0 0r-dln»t4t.r d* eord I P)l 

ot»?* ( " 

985 RC*E4?o4i e 

986 WAIT3O0 CLS 

»7 POKE49088-19 POKE43640, 18 PJHG 
93? PRIHT"Elol*ri»f»fTit Prrtr-^ssir du w 
Hi ■ ■ ■ 

989 PRINT- • RPf»RT> H) RATES EChtC MI 
(ON 

■ : ■ |0| . ■ . . ! ,,-j: ; 

: ■ - - 
992 PQKE4 -!■■'•: ! .■■ ■ ■ i -■■ 1 1 . [ nh 
[T38 

.,;■■■ 

..,. ,,„; ■ 

"-- -AFFICHACE- 

1010 OEM 

:■' - 

1930 p'-. | 

1840 POKE49040 IT 

1950 POKE 4 ?030 20 

I960 ppiht": Vit : BH !To :Ti»*: R 




ts ! F.;*l ■■- 

1070 PPIHTIHT'VIT)iSPC'2)-INT'DIS)-SP 
C'2>,INT'TPi,SPC'2).TiSPC' 1).PTS.SPC<1 

jF 

1030 GETRS 

1188 GOSU83909 

1110 RETURN 

1120 GOTDI9O0 

1203 PEM PLAHETE 

1210 PEM 

1220 IF'/IT>OTHENI300 
1240 J«INT'DIS/10900>n 
1245 CURSET120.85.3 
1250 F0RW=E T0E*J 
1255 IFW>89 THEN RETURN 
1260 CIRCLED 1 
1270 NEXTU 
1230 E-E+J 
1290 RETUPN 

1399 K=IHT'CIS^1990O>*1 
1305 IFE<1THEN 930 
1310 CURSET128.83.3 
1320 FORiJ-ETOE-KSTEP-1 

1339 IFM'OTHE[jo E TrjPM 
1335 IFU<0 THEH980 

1340 CIRCLEU*1.0 
1350 NEXTU 

1360 E-E-K 
1379 RETIJRN 

1499 REM TEMPS 

1 420 REM 

1430 CLS 

1449 P0KE49909.21 POKE43049,21 ■■ PING 

1450 PRINT" >» TEMPS - DEPASSE 
<«■ 

1469 PRIHT"Le t*nPs 4ui wOUS *t*it 1m 
Ptrti *st-." 

1470 P0KE49901-0 POKE49941.9 

1475 1JAIT490CLS POCE49090.21 POXE 49 
040.21 
1480 PRINT"... d»P»ss« . d*50l* ; Pr-oc 






2603 IFT'HOTMEn BO»250»INT'RHt>'i>*i2 
5 -1 G0T02686 

2694 IFT>130 THEN MA-508*INT' PNt-' 1 .*2 
50>*IGOTO26O7 

2605 IFT>I41 THEN Mfw258*INT'RNrvi «tl 
25HI G0TC2697 

2606 IFT- 140THENPRIHT PRINT" > 
>> 80IWS "iBO." '"' 

2607 IFT>14I TMEHPRINT PRINT" 
>» MALUS -iMA," <«■ 

2608 WAIT4O0 

2610 P0XE49848.19 pnKE49088.19 

2623 POKE49880.16 PING 

2630 PRINT" »> VITESSE CORRECTS 



» AUTO-DESTRUCTIOH i 



1490 PRINT" 
«" 
1431 POKE49O01-9 P0>:E49041.7 

1492 F0PI-1T018 

1493 P0KE4304!.? SOUND1.500.13 UAIT58 

1494 POKE49041.7^SCHJNO1,190,13 UHIT50 

1495 NEXT I 

1496 PLAY0, 0,0-0 GOTO 10909 

1509 REM— FUEL 

1519 PEM 

1515 2S--FUEL" 

1520 CURSET0.0.3'FILL 8. 1 . 17 CURSET25 
.8.3;FILL 8.I.13CURSET50.0.3TILL 3.1 
.18 

1530 CUR3ET195,8,3<FILL 8.1.16 
1349 FORZ-1 T0LEN(Z*> 
1550 CUPMQV6.0,0 
1560 CHARASC:Mir>S'"2«,Z.l >>,0,1 
1570 NEXTZ 

1575 IFF'O THEN CJPSET9.8.3 F1LL3-1-1 
S- RETIJRN 
1589 M-INTCFU' 30J+M 
1530 CUPSET193-M.0.3 FILL8.1.16 
1610 RETIJRN 
2909 PEM HUSIDiJE 

2O10 PEM 

2012 PEM 

2020 DIttKieS) 

2030 FOPHMTO105 

2040 PEADN^A-. 

2050 HEXTR 

2052 RETURN 

2055 PEM THEI1E1 

2060 F0RI-1TQ2 

2979 F0PA=1T049STEP3 

2039 MIJSIC2. H'A',H'«*n, 13 

2999 PLA'f-3.0.7.5000 

2198 IIA1TH' A+2'' 

2119 PLAYO. 0-0.0 

2158 HEXTA NEXT] RETUPii 

2200 PEM 7HEME2 

2205 F0RT-1T02 

2210 F0PA=52 TO103STEP3 

2220 MUSIC2 u. A ».t-KA*l •>. 13 

2230 PLAY3O750O0 

2240 HRITN' R*2 ■ 

2250 PLAYO. 8.0,0 

2268 NEXTfl NEXTI PETUPH 

2380 DATA3- 1,88.3, 1.23.3.8.69.3.6,28, 
3, 5. 29- 3. 3. 29, 4. 1-70. 3 -3, 55. 3- 6 -20 

2310 DATA3. 3. 29. 3, 3- 28, 4, I, 79, 3, 8,55. 
3-6, 29. 3, 5. 20. 3. 6. 29. 3, 3. 130 

2329 CRTA3. 6- 70, 3, 6. 70. 3, 6. 79. 3 -1,59, 
3. 9. 29, 3, 6- 69. 3 -1.50. 3, 9, 29 

2339 0ATA3-630.4,1 ,60.4, I. SO, *, 1,68, 
4. 2. 45-3, 3. 25. 4, 1.69. 3 1 50 

2340 t'ATA39,20.36-129 

2500 REM DETECTION 

2505 REM— - 

2519 IFOISX-JMF THEH88C1 
251! CLS 

2512 POfE4?O40.i3 POKE49O80,13 
2518 P0KE4908916 PIHG 
2548 PPIHT" > .CHRMP M FORCE PLANI rfllfi 
E t'ETEMF -■" 
2560 CN-I-: -'■■ 
2570 PRINT" -DISTANCE PPESUMEE ", 

2373 P0XE49843.8 PTjKe49881-8 P0KE49W 

5-5 

s ■■ '■'■■ a - 

2398 IF'MT .. -l00tH iTHEN269fl 

:.- rupx 

REM— - CBLCULS 

■ ■ Ren - 

2691 [Fl ■ rHEN I : ■"■<•■ INT.- Ptif" 1 ■!-. 

2682 IFTM00THEH f,i>5fj0*IKT.'PNt" I '*?"■ 

8)*1 GOT02696 



2640 PPIHT" 



■ Chtdc-tlSt «n cour 



2650 POfE49041,4 
2655 FORI-1TO10 

2669 POVE49901.I MRIT50 POKE49081-3 U 
AIT39 

2670 NEXTI 

2680 CLS PWE49999-19 PC*-E49048, 19 PI 
NG 

2690 PPINT"Coordonn*n c*lcule*s d*»» 
*.«ri#lis^-" 

2709 PPINT"*.ior, rossibl* *PP'.i^«z sur 
D. .." 

2718 P0KE49O01-4 P0KE49841.4 PQKE4<*05 
3,1 

2720 GETRS 

2721 IFRS*"D" THEH2730 

2722 GOT02720 
2730 CLS 

2749 FORI-10 T01STEP-1 

2745 PRINT 

2758 PPIHT" »>_-.[,-_<« 

2769 P0f£4904j .1 P0KE49048.22 
2762 IJAIT50 

2765 CLS 

2766 MUSIC1.2.I,I3 PLAY1,8,9,0 

2770 NEXTI 

2775 PLAYO, 8-8. 8 

2783 REM DEMATEPIALISRTION 

2790 REM 

2898 CLS ZAP ZAP ZAP 
2810 HIRES 

2329 F0PI=I TO 10 

2838 PRPEP0 PAPEP7 

2848 NEXTI 

2350 HIRES 

2860 CUFSETO.0.0 OPAH233- 199, 1 

2870 CUPSET239.0.0-PPAH-239.I99.I CUR 
<?.ET12O.0.0 DRRU8, 199,1 

2880 CURSETO- 100.0 !'PAW2??.0.1 CUR8E1 
0.50.9 DRRW239. 108.1 

2899 CURSET8, 158,8 DRAN23? -100. 1 
2895 F0PJ=U04 

2900 F0RV-99T08STEP-3 
2905 P=INT'PHt>' i )»6>*] 
?9f*f. PAPERP INfP 

2910 CL'PSET7.Y-0 FILL2.17 r,.^SET7.99 
»<99-Y>.0 FILL21 ,7 

2920 CUPSET7.Y.0 FILL2 1.4 CURSET7.99 
*<99-Y).0 FILL2.1 .4 

2930 PLAYO. 3.0.0 S0UND4-Y,13 

2940 NEXTYNEXTJ 

2959 GOTO90OO 

3090 PEM— FUEL 

3010 PEM 

3015 P0rE49009. 19 -F«0KE49WI 

3016 TP=TP-20 

3017 IFTP:OTHEHTP-0 
3818 TS-T8+58 

3919 IFPTS'O THEHPT - Nfl 

3020 FU=0 

3033 GETRS D0KE*386,t968 

3949 rFAS-CHP*- 32 >THEH DOKES386,»27ie 

PETUPH 

3360 FU«FU*10 

3970 T8«T3*18 

3075 TP=TP*3 

3078 PPIHT PPINIFlj 

3030 GOT03833 

4900 REM VAISSEAJj 

4010 PEM — - 

4050 c'jRscriro, 191 -3 

4060 FORIMT028 

4070 CURSETI88+I ■ l?t*INT> I ■' - 

40=;0 r'PAU2n+ INT' I *.-.-|*>im. I *, . 1 

4090 HEXTI 

4100 CURSE T I 00. 191-3 DPAH23--1" " DRfl 
W20. 2,0-DFBW-20 -2 8 DRAW-2 1,0 

■Ml" rypstTi.-'S 1-1 ■ ' r-POU- I . -1 n n-tni 
3,-l ,0 DRAH-5, 1 8 DPAW^3,-I -0 

4130 CUPSET124. 188-3 < IPCLE 4-« 

4140 CUPSETM :-■ I W, I-CIPTXI >■ 

•1150 CJPSETI34. 183 ' IFi i !■ i- 

4200 FOPt-iTO 35 

4210 POKE47933*I*40. I POM 47943*It40, 
7 

4220 HEXTI 

4250 RETI.IPN 

4500 PFM- — tehpep-aturi 

4510 REM— 

4520 IFTP)1280THEN4798 

I H -i- .1008THEM47M 

-!■ 40 IFTP >888 THEU4650 

4338 [FTP '688 INEH460O 

i, nt : -.. i .rindn.,;-- f.,n f..i.'imii. 
4618 PPIHT" t i i,t if iik ii li ii. i.i 

-" ■ * PINT" .t •. ,,'.!.. hllst* l» 

dtblt. .." 
4638 P0tfE4988I A P0KE4984I 
4640 UAIT599 MJW0C*N PI TIJBtl 

.l.'-.C i i- i a 1000 i ■■. i 14040 ' [NG 

l$< IPI INT" ■ ■ ijH ii'- ■■ ■ 

| Ml.- .-,," 

i I PtHT" ■ ■ REDUI i Z '.i '■■ ' 1 ! 

Ill « " PING 

4 tS0 pQ| | 49891.4 ■ i "841 i 

4698 UAIT500 MR-209»H RETURN 

Sujfe page 9 



BATTLE 



Ce jeu n'est pas comme on pourrait le croire une ba- 
tailte sans pitie entre deux vaisseaux, malgre le nom. 
Vous possedez plusieurs armes pour detruire lennemi 
afors qu'en face te vaisseau ne possede qu'une seule 
arme: le tir. 

Mais attention, il ne faut pas trop abuser de vos 
moyens, cela pourrait vous etre netaste. 

Stephane BERTIN 
Mode d'emptoc 

Poor deplacer voire naverte. actionner le bouton haut et bas du cur- 
seur. 

Pour brer, actionner le bouton droit du curseur. Vous pouvez vous 
proteger avec te bouton gauche du curseur. Pour se rendre dans 
I'hyper espace. actionner la louche H. Cette louche permet de de- 
compresser 1.15 minutes. La louche "Heure/Crr permet de tirer et 
a~avcwT obtigatarement son adversalre. 



L« 27 juillet, un numero 
quadruple pour le prlx de 3 
numeros. 4 programmes 
par ordlnateur. 64 pagea! 
24 Franca chez voire mar- 
chand de (oumaux. 




O C0NSOLE0.4.0:HM-30O 

2 FONT»ci28>--o.4.4e.; 

3 F0NT*(129>--0,224,9i 



CANON X-07 



(D + 1NTIRNDC 

>17THEN60 

<!OTHENY(I)-0 



Oi INPUT 


•o 


FF( 


NTfRND 


n< 


))• 


XT I 






>.V(I): 


ph 


(HE 



4 GOTOIOOO 

3 GOSUB3000:CONSOUEO.*,0. 1 

I A BI-1A 

6 X-17iY-2:F0Rl-0TQ3:X(I)- 
A)iY<I)-INT<Rt4D(Y(I)>>3):N 

7 IFC-OTHENIOO 
10 CLSiFORI-OTQ3:LOCATE X< 
HJ**,C224+I);CHR»(13t)::NEXT 

II LOCATEX.YsPRINT CHR«(12B)i 
70 Z»-INKEY» 

21 IF7.*-OR*(29)THEN710 

22 IFZ*«CHR*(28)THEJ46O0 

23 IF7»»-H*THENBO0 

24 IFZ*-CHft*(22>THEN3O0O 
23 LOCATE X,V:PRINT- "I 

30 Y-Y*{Z*-0*HH30>>-tZ*-CHft*(31>> 

33 IFY<0THENY-O 

34 lFY>3THENV-3 

33 LOCATE X.VsPRINT CHR* (126)1 

39 BEEP300, 1 

40 F0R1-0T03 

41 I^INTIRND(U»*1O0)jIFH>10THEN5O 

42 SEEP30.4 

43 V-lHT<RNO<V)a(TO~XCl)) >*X(I):OT-<X< 
*1>»6:AT-(V)»6: VT-Y(I>»B 

44 L1NE(DT,YT.2)-(AT.YT*1*C»:LINE(DT,Y 
6>-(AT.YT*7-C> 

49 IFV>-XANDYa)-YTHENR£TURN 

50 IFX(I)<19THENX<I>-X(I>*A!BOT078 
60 IFYIIl-YTHENRETURN 

70 B0SUB300 



7B IFXU 



90 NEXTIiGOTOlO 

96 , 192,224, 192, 96, 224-:GOSU84BOO 

100 FORC-lTa3:60SUB10:L0CATEX,YsPRINT X* 
f 

101 X { I ) -O: Y ( I ) -O: LOCATEO.OjPRINTCs BEEP1 
,8:8EEP2,8 

102 8EEP3,B:BEEPI,a:NEXTC 

HO CLSiPRINT-GAHE OVER-,ST»10 
120 B£EP3 t BsBEEPl,*:B£EP3.B:B£EP12.8 
130 CLEAR: G0T03 

30O X(I)-INT<RND(XU)»-A):Y<I>-INT(RND(V 
(I))»4)s RETURN 

600 CE-0:F0Rt-0T03: IFY ( II OYTHENNEXT: IFC 
E -0THEN7 OOE L SE 603 
602 CE-CE*I:XC<CE)-X<I):YC(CE)-Y<I>:ZC(C 



) >ETMENE-: 



603 F-OsF-OsFQRI-OTOCE:!! 
(I) JF-ZC(I) 
606 NEXT 

610 XB-<E*1>*6:GOSUB650 
613 ST-ST*S»X(1>»I4-I>;CT-CTt1jA-A».0S 

619 IFST>HHTHENHH-HH*7:G0SUB400O 

620 X(F>-INT(RND(X(F) > *A> I Y<F> -INT (RND (' 

630 BEEP3,2sBEEPl,2:BEEP4,2 

640 GOT040 

650 »»II-I»»4: YT-Y>B:LINE(Xr>»6,YT*l)-[: 

B,YT*4*3«(XB-0) ) 

660 &EEP39.3:LINE(XD*A,YT*7)-CXB,YT*4-3' 



(XB-01 

670 IFXB-OTHENRETURN 



6BO LDCATEE.'iPRINT r*l 

690 RETURN 

700 xe-O:GaSUP63OiE>EEF>49.3:GOT04O 

no I-INT<ANO(I)*tOI i IFZ'DThEM22 

•: c C r,i.)!a;:5T^T'3«ii|i|l>l(li.il|iipy 

M>=V(I>iG0SUP300iNEXT 

■ I I -ORL-9T0llO!CIPCLE(108. (Y-BI »4), 
Ll J-J*.5lF-10e-L:L-L-J 

740 FORC— OTa'sH-P' (G>»6: [FH -• AHDTXH*! 2 
TMENG0SU6760 

730 NEXTGlBEEP39.1iN£XTLtGOT020 
760 LOCATEPXI6> .PYtG) sPPINT VattBE£P3,2l 
E-EEF ] .TsEEEf a.Z 
770 PX(G)-l9:PYIG)-0iRETURN 
799 END 
BOO FORJ-|T04:FOR!-15*JTO! 1 1STEP4! CIRCLE 

(108. (Y»B)*4) . I 

BEEF !500.B:NEXTI,J 
BOS FORI-15TD0STEP-1; BEEP25C0. 4: CIRCLE U 
OS, "»B>-*) , I:F0RJ-OT039:NEXTJ. I 
BOB GOSUB40OO 

BIO FORI-0T0119:LlME(I,0)-<I.3!>:BEEPIOO 
O. UNEXT 
970 CLS 

850 LIN£(0.0)-<119.0)lLINE-(ll9,31>sLlN£ 
-<0.31HLINE-(0,0) 
860 F0RI-1T04:FQRJ-0*!T060STEP4 
863 LINEI60-J.13-J/4)-(60-J, 16* J/4) [LINE 
l60*J.13-J/4)-t60*J. 16*J/4) 
B69 IF1MTHENB80 

870 LINEI60-J. 15-J/4)-(60»J, I3-J/«J:LINE 
(60-J, 16*J/4)-<60»J, 16*J/41 
B7S 8EEP2000, 4 
880 BEEP900.1:NEXTJ. I:GOTD6 
999 END 

tOOO FONT* (133) -"224, 148. 148, 228,1 44, 136 
.240,0- 

1005 FONT*<I36>-"220.36. 16,240, 144.136.1 
36.0" 
1010 FONT* 1 1 37) -"252, 8, 132, 128. 64. 64. 32. 

o- 

1013 FONT* (13B) --192,32. 16, 144,136,68.32 

,0" 

IO20 FONT* 1139) -"240. 64, 32, 28,8.4,249,0" 

1025 A-232iFONT«( 144) -"124,60, 28, 12, 4, O, 

248,0": FONT* (143) -"A, A, A, A, A, A, 124.60" 

1030 F0NT*(146)--A.A,A,A,A,A,A,A- 

1033 FONT* (147)- "A, A, A, A. 248. 240. 224, 192 

1040 FONT* < 148) --22B.200, 144. B. 4. 136, 112 

1043 FONT*( 1491 -"196.40, 16,60, 64, 64, 132. 

O" 

1050 FONT*<13O)--196,40,B0, 188, 68, 136,9. 

o- 

1055 FONT** 131 >-"2B, 160, 160.64.64,136. 11 

2,0" 

106O FONT*flS2)--60, 160.64, 120,64, 129,24 

8,0" 

1063 CLS:CONS0lE1,3.0iFORI-0T0119iLINE<I 

,0»-(I,3I)iNEXT 

1070 LOCATE 0,1:REST0RE 1071 

1071 DATA 146, 146, 146, 147, 14B, 149. 130, 13 
1,132 

1072 DATA 32, 133, 136, 137, 138, 139, 144. 145 
, 146, 146,146 

1073 FOR 1-1 TO 20:REAO WiRRINTCH** (H) ( I 
NEXT 

1103 FORI-OT01999:NEXTiCONSOLE 0,4,0 
1110 PRINT-Voo* }oumz contrt 4 v«l»«m 



I1IS GOSUB2O0O 
1120 PRINT-Lm t 



MARIENBAD 



Un classique du jeu de reflexion cedes, mais qui ne- 
cessite quelque peu de strategie. Soyez bon joueur car 
votre ordinateur ne sera pas facile a battre. 

J.Francois WILARD 
Regies du jeu: 

La but du jeu est de parvenir a prendre la ou les allumette(s) res- 
tante(s). Mais attention car si vous pouvez saisir autant d'allumetles 
que vous le desirez. vous ne pouvez le taire qua la condition qtj'el- 
tes soient sur 13 meme rangee. 



T\-99 4/A 
BASIC SIMPLE 




160 FOR J-I TO 9 

170 REAO B(I),8*<I) 

iff J NEXT I 

190 DATA 1. 1. IO.O, II. 1 . IOO.O, 101. 

,111,1, lOOO.O, lOOI.I 

TOO B*<OJ--0- 

210 CALL CLEAR 

220 CALL CHAR<!29,-19: 

230 CALL CHARM 29, -18 

240 CALL C0L0RO3.16. 

250 RAMDOT1I7E 

260 PRIMT TAB(IO>|-»' 

)l"«-|TA»r22) f»-iIA 

-iTABdO)! -«-;rABf22 

270 PRINT TABIIO>i "• 



:■"■: 


fOR I-I TO SOO 


290 


NEXT I 


MO 


PRINT llflllflffl 


310 


GOSUB 1940 


320 


GOTO 17BO 


330 


C*-'A VTJUS.' 


140 


X»13 


I50 


GOSUB 970 


3AO 


CALL K£Y(O.K,S> 


370 


IF K<49 THEN 360 


■sv, 


IF »(>53 THEN 360 


T9C 


L*K-4e 


•00 


C*-STR*(L» 


*i'. 






GOSUB 970 


4 30 


CALL SOUNDdOO.-l 


•40 


CALL KEY(0,K,S) 


MM 


IF K<49 THEN 440 


460 


IF K>37 THEN 440 


«/o 


n- r aii 


■;ir. 


c*-c**"...-fcsrR*< 


490 


1-14 


300 


GOSUB 970 


510 


CALL S0UN0<100.-1 


920 


CALL KEY(O.K.S) 


330 


IF S-O TttN 52d 


540 


IF K<>1J THEN 3iO 



550 IF rK-TrDTMCN 390 

560 C*-" IMPOSSIBLE RECOHffENCEZ. " 

370 GOSUB 930 

SOO GOTO 360 

390 GOSUB 1210 

600 IF VOO T«N 640 

6tO C*--VOUS AVEZ GAGNE.JE N' EN f 



GOSUB 950 

GOTO 1690 

C*-"JE REFLECHIS. , 

X-10 

GOSUB 970 

IF GOO THEN 760 

REM N8 GRUNDY 

FOR I-I TO 3 

G-G*B(TIII) 

NEXT I 

0-G 



960 X-4 




970 V-23 




980 FOR J-I TO 2 




990 CALL MCHAR<22»J. 1,32,32) 




lOOO NEXT J 




1010 FOR N-l TO LEN(C*> 




1O20 D«-5E8*(C*,N,1) 




1030 A-ASC(D*> 




1040 CALL HCHAR(Y.X.A) 




1050 X"X*1 




106O IF X>32 THEN 1090 




1070 NEXT N 




1090 RETURN 




1090 X-2 




llOO Y-V*l 




11 10 GOTO 1070 








1130 0»-SIR«(O) 




1 140 FOR 1-1 TO LEN(D*1 




1150 DO*-SEG«(0*,I, I) 




1160 DOQ*-DOG*LB*<VAL<0a*> ) 




1 170 NEXT I 




1180 0-VALtOOO*) 




I 190 DOO*--- 




1200 RETURN 








1220 CALL HCHAR(4*(2»L), 1B*L-T(L) 


, 129.H) 


1230 T(L)-T(L)-rl 




1240 V»V-M 




1250 RETURN 




1260 REH COUP AU HAZARD 





l^/O L-INT(3*RND)»1 




12BO IF T(L)-0 THEN 1270 




1290 C«-'JE JOUE EN "bSTR* (LJfc" . . 




1300 H-i 




1310 GOSUB 930 




1320 GOSUB 1210 




1330 GOTO 330 







630 
660 

670 
680 
690 

roo 

710 
720 

no 

/*<. 

790 

760 
7/0 

.- 1 V i 
790 
900 



MO 

IIVi 

B60 
070 



I'M. 

930 

•> -., 
940 
95< i 



B-O 

IF O-O ri«N 1260 

FOR L-I TO 3 

IF I (L)-0 THEN BBO 

NIN-O 

FOR Y-l TO S 

Mir -filn-biTfY)) 

NEXT t 

NIM-Nln-BlT<L>> 

FOR N-O TO TIL) 

B-NIIH0<N> 

OOSUR 1120 

IF O-O THEN B90 

NEXI N 

NT»r I 

h-i (D-N 



GOSUB 9SO 

ir <j-u int.fi i ■«.■> 

GOTO ISO 

REM COntENTAlRCe- 



1 ISO FOR 1-1 TO 8 

1360 CALL COLOR < 13, 2, 1) 

1370 CALL SOUND (50, 200,0,500,4) 

1380 CALL SOUND (30, 300,0,600,8) 

1390 CALL COLOR(13,16,l) 

1400 NEXT I 

1410 FOR 1-1 TO 9 

1420 CALL COLOR(13,2, 1) 

1430 CALL S0UND<30, 400.0, 1O0O.4) 

1440 CALL SOUNDISO.SOO.O, HOO.4) 

1430 CALL COLOR(l3,16, I) 

1460 NEXT I 

14/0 CALL CLEAR 

I4BO CALL SCRFENI 14) 

1490 ON IHT(!(i»RND) • I GOTO ISOO. 1320, 134 

O, 1360. 13BO. 1600, 1620, 1640, 1660. 16B0 

1300 PRINT -VOUS EIES IROP NUL POUR VOUG 

MESURER AVEC HOI •" 
1510 GOTO 1690 
1320 PRINT -PFFT •'!" 
1330 OOTO 1690 

1540 PRINT -HUM • HUH, HUM '■" 

1330 GOIO 1690 
1360 PRINT 'AlrlEZ VOUS VRAIMENT RARA1TRE 

R10ICULE T" 
1370 GOTO 1690 
1380 PRINT -CELA SC PASSE Of COMHENTAIRE 

1390 GOTO 1690 

16O0 PRINT "VITE FAIT. MEN FAIT." 

1610 OOrO 1690 

1620 PRINT "ALLEZ VOIR, A1LLEUR8 91 J*Y 9 



'•lt «<r#C !■ taucr>« 



1123 ( 

1I30 PRINT']* tir 

1135 G0SUB2000 

1140 PKtttfvtxtrm emwi touch* toujour* v 

1145 GOSUB2000 

1150 PRINT'oul *u' n* ti'fcnt p« ( teuj 

1133 GOSUB20OO 

1160 PRINT-un v*i***«u touch* r*oe>orE* 3 

1 1 63 GOSUS2O0O 

1170 PRINT'sultlpli** (tar 1* aittin;* *n 

trm vouj *t ]• val ■■■■»' 

1173 GOSU820OO 

1180 PR1NT-*C Mtnltnin( * voui a* jou*r 

1183 OOSUB20OO 

1190 CONSOLED. 4. OiCLStBOTO S 

TOOO FQRI-0T0499 

2O10 NEXT IiRETURN 

3000 FONT»(254)--16. 169.64,64.40. I2B. 14* 

.32* 

3010 F0NT*(253)--3r,B,64, 0,40,0, 64.8- 

3020 XS-CHR*(253>*CHR*(234>:V*-CHR*(234> 

*CHR»(T53URETURN 

4000 RESTORE 4001 

4001 DATAO.0,0, 144,252, 144.0,0 
4006 DATAO. 16,24,60,20,60.2*, 16 
401O DATAO. 16,24,52.28.52.2*. 16 
4020 DATAO. 16,24,52.24,52.24. 16 
4030 DATAO. 16.24.52. 16.32.2*. 16 
4O40 DATAO,192. 32. 128. 192. 128,32,192 
4O30 DATAO. 28.36, 12.24.12,36.28 
4060 DATAO,28,36,8,28,a,36,2fl 

407O DATAO. T8, 36,8, T0.B.3A. 28 

4080 DATAO, 28. 36.8, 16.8,36.28 

4090 DATA0.224, 129, 192.232. 192. 128.224 

4100 DATAO. lOO. 64.244. 92. 244. 64. lOO 

4110 DATAO, lOO. 64, 180, 124. 1B0, 64. 100 

4120 DATAO, IOO. 64, 180. 9T, 180,64,100 

4130 DATAO, 100,64,180, 76. 180.64,100 

4140 DATAO, 224,0. 192. 232. 192.0.224 

4150 DATAO. 29. 76, 228. 92. T2B. 76. 28 

4160 DATAO, 28, 76, 164, 124. 164,76.28 

4170 DATAO, 28. 76. 164.92. 164.76.29 

4190 DATAO. 28, 72. 228. 92. 228. 72. 28 

4790 REM 

4800 READAA,AB.AC.AD,AE.AF.AG.AHiFONT*(l 

31 >--0ft,A8.AC.*D,ft£.AF,.a;i,,.lH- 

4B10 F0RI-0T03iREADAA,AB.AC.AD.AE,AF.AG. 

AH 

4B20 FONT*(224*I>--AA,A8.AC,AD,AE.AF,A6, 

AH":NEXT 

4830 RETURN 

5000 FOR I -OT03 1 L INE ( 1 OO. Y«8»4 ) - ( X ( 1 ) »6*6 

,Y(I)«B) :BEEP39, 1 

3010 LINEU00.Y»B*4l-(X(I)»6*6.Y(I)»B*9) 

5013 L0CATEX<I),YlI):PRINTCMR*(224»I)lCH 

R* ( 1 3 1 ) : 

5020 FORJ-7TOOSTEP- 1 1 C I RCLE ( X ( I ) »6« 6. Y ( I 

>*8*4),J:BEEPIOOO, Is NEXT J 

3030 LOCATEX(I) .YdUPRINT X*t:NExTl 

5O40 FORI-0T03) ST-ST.3»X 1 1 ) i G0SUB3O0I NEl 

5050 GOT 020 



Le 


27 lu 


Hot 


un numero 


quadruple 


nou 


le prlx 


de 3 


nu 


neros. 


4 


prograr 


rimes 


pn 


ordlr 


iteui 


64 pages' 


24 


francs 


chet votre 


mar- 


chand de 


ourn 


aux. 





UIS- 

1630 GOTO 1690 

1640 PRINT "SI VOUS VOYEZ VOTRE TETC' C - 

EST A MOURIR DE RIRE. " 

1650 GOTO 1690 

1660 PRINT -OUAND rROUVERAI JE UN ADVERB 

AIRE A HA HAUTEUR -? " 

1670 GOTO 1690 

1690 PRINT "A VOTRE PLACE JE HE POSERAIfi 

DES QUESTIONS. . .* 
1690 FOR 1-1 TO 13O0 
1700 NEXT I 
1710 PRINT : is : : 

1720 PRINT "VOULER VOUS REFAIRE UNE PART 
IE 7 (0/N)~ 
1730 CALL KEY40.K.S) 
L74<"> IF K-79 THEN 1780 
1750 IF KO70 THEN 1730 

1760 PRINT lll'JE CROIS EN EFFET QUE CEL 
A VAUI MIEUK • ■ ■" 
1770 END 
1790 PRINT -DESIREZ VOUS COMMENCEZ (0/N) 

1790 CALL »(V0. > .-,. 

IBOO IF K-7B THEN 1820 

1810 IF K<>79 THEN 1790 

1820 CALL CLFAR 

1BJO CALL SCREENO) 

1840 0-0 

IB30 V-23 

I860 FOR 1*1 TO 3 

1870 T(])-(2»I)-1 

18SO NEXT 1 

1890 FOR 1-1 TO 3 

1900 CALL HCHAR(4*(2«I), 19-1. 128, (2»1)-1 



1910 CALL HCMARI4.<2»I), 17-1,48*1) 

1920 NEXT I 

1930 IF K-78 THEN 640 ELSE 330 

1940 PRINT "vou I *I vou* pr*odr* conntIM 

anea <i»* r*gi*« 7 io/ni'iimi 

1950 CALL HVI'i,. ■ ,:< 

1960 IF S-0 THEN 1950 

1970 IF K-79 THEN 1990 

1980 GOTO 1780 

1990 PRINT TABU4U-REGLES-I II i I 

2000 PRINT -TAPEZ -:ENTEfJ> POUR DECOUVR1R 

UNE NOUVELLC PHASE DE LA REGLE "1 1 1 1 1 

2010 GOSUB 2130 

2020 PRINT "BUT DU JEU i t>*rr*i 1* ou 1 
• • (Hffllwt baton* d'un* pyniiO* , QUI 



ur. m chaqii* tour d» j*u,vou* pouv*i bar 

rmt -I 

2050 PRINT "un ou plukifurt batons dan* 

(una a*ul*.' rariQ**" I i ) I I 

206O GOSUB 2130 

2070 PRINT -POUR CELA i t*p*r 1* miawrO 

d* 1* rang** , put* la now»r»« cl* batons 

d*v*nt »tr*« ray**. "Illlll 
2000 OOSUB 7130 
2090 PRINT >r,liB tapai *r.t*f . I a pr***tO 

n d'un* autre tcnicb* antral na I'anullatl 

on du coup *n» i «jg»" i i : : r 

2 IOO GOSUB 2130 

2110 PRINI : i i : I 

3120 RE1URN 

2130 CALL ►rvtu.l ,11 

2140 CALL SOUND (IOO, 110, 12,220, 14. J30, 16 

2150 call NUND160, 330, 12, 110,14,; 

2160 CALL SOUND! JO, 220, 12,330. 14, 110, I*) 

2170 n ' i ' rH N -'i 10 

2 l no RETURN I 



La 27 julllel. un mim*ro 
quadruple pour la prlx de 3 
numaroa, 4 programmes 
par ordinalsur, 64 pageal 
24 franca che* voire mar- 
chand da journaux. 



COAL PIT 



La mine est en effervescence, il vous faudra, si vous 
tenez a conserver voire elevateur en elat de marche, 
dinger ce dernier de telle sorte qu'il se trouve toujours 
au bon endroit, au bon moment. Sinon, eh bien votre 
monte-charge ira s'ecraser au fin fond de la mine! 
Les regies sont dans le programme. 

Francis FAURE 



130 RANDOMIZE 490 GOTO 1640 




1 90 



BCF. SRfiF. 



LE DECOR 



170 CALL CHARH?.-00007E7EIBiaoOOO"> 

i bo CALL Clear 

1*0 CALL COLORiJ, 16,1.4. 16.1 ) 

200 FOR FF-3 TO B 

210 CALL COLORCFF.2, 11) 

220 NEIT FF 

230 CALL CHAR<48. -OOFE8£9£e£FEFEFE00383a 

]618t9187E0O7E0eOEFEB0eOFE0OFC0C0CFE0e0E 

FC-» 



310 ! 

320 ■ 

330 CALL HCHARI 22, 1,94,321 

340 CALL MCMAR(7. 1.94,32) 

350 CALL HCMARM7, t .94,32) 

360 CALL MCMARI 12, t.94,32) 

370 CALL HCHARI 23, 1,97,32} 

380 CALL HCHARI24. 1.98, 321 

390 CALL HCMARUS.1,97,32) 

600 CALL HCHARI 19, 1.9B, 321 

610 CALL HCHARI14, 1,98,321 



"0O7C4444FEC6C6FE00FE8E 



OC"! 

230 CALL CHAR (36, ' 

FE060*4*FE" 1 

260 CALL HAGWlFVi31 

270 CALL SCREENI8) 

280 CALL COLOR (9. I 1 , 1> 

290 CALL COL0RI8.2.1) 

30O CALL CLEAR 

310 CALL CMAR(108."O0000OO00OO0O3O5O77F7 

p.- ?r^9?B30O01809C-90B08E8F8E0E0e0FBFC34F 

coo-> 

320 CALL CMARI33."!B18iai81918181B-] 

330 CALL CHARI93.-O0OOOOOOOO94FFFF-; 

340 CALL CMARI94.-OOOOOOOOOOFFFFFF- 

330 CALL CHAR(96,"00000000009«FFFF -: 

360 CALL CMAR(97. -FFFFFFFFFFFFFFFF-1 

370 CALL CHAR<9B.-FFFE940000000000") 

380 CALL CHAR I lOO." 000000000000000001030 

B3F0OOO0OOO0OO0OOOOOOOO0OBOC0E0F0FS00OO0 

00O-) 

390 CALL CHARU04.-OOOOOOOOOOOOOOOOOOOOO 

OOOFF7F3FOOOOOOW3OO0OOOOO0OOOO0O0FaFSr0F 

400 CALL CHftRI] 12,-000000000000000000000 

OFFTFFF03030000000000000000000000FFFFFFC 

OCO-I 

410 CALL CHARCI16, -OOOOOOOOOOOOOOOIOIOOO 

oooooooooooooooooooooooooeoeoooooooooooo 



430 CALL CMAR< 124,-000000000004000101000 

4000000000000000000004000806000200000000 

ooo-> 

440 CALL CHARf I29.-0O0OO0OO0B0OO2OO0OO20 

008CO0O0O0OOOO000O0 1 0004000004000 1 oooooo 

OOO") 

430 CALL CHAR! 132. "000000100004000101000 

400 1 0O00000000O00OeO020OOfl0SOOO200O0B0O0 

ooo-i 

*60 CALL CLEAR :: CALL SCREENUld: fl«-" 
' J R£SSER»ALPMALOC>'»POSlTI0H*MAUTE«•■■■ ! i 

CALL TEXTF_tfi».9) 
470 CALL CLEAR 
4 BO GOTO 1430 



620 


'- ..1. 1 


HCHARI 13, 1,97,32) 


630 


CALL 


HCHAR14, 1,98,32) 


640 


CALL 


HCHARI3. 1.97,32) 


650 


CALL 


HCHARI2. 1.93.32) 




..--■: .. 


HCHARI9. 1,98,32) 


670 


CALL 


MCMAR<8, 1,97,32) 


■:■ "i ■ 


DISF1-AV AT(l.Z01SIZE<e>>lV/.//" 


690 






':■ ' 




LES SPRITES 


720 


CALL 


SPRITE 1*4. 108,2.139,240.0.0) 


730 


CALL 


SPRITE (#3, 108,2, 119,240,0,01 


740 


CALL 


SPR I TE 1 »2 , 1 08 . 2 , 79 , 240 , , ) 


730 


CALL 




760 


CAI L 


SPRITE (43, 100,2, 139,223,0,0) 


770 


-.-■■: .. 


SPRITE(«6, 104,9, 139,223,0,0) 


7 BO 


CALL 


SPRITE I ml, 100,2.39,223,0,0) 


790 


CALL 


SPRITE 1 #8, 104,9.39,22*3,0,0) 


800 


CALL 


SPRITE(»9, 100,2, 1 19,223,0,0) 


BIO 


COLL 


SPRITE I »10, 104,9. 119,223,0,0) 


820 


COLL 


SPRITE (• I 1, 100,2,79,223,0,0) 


830 


CALL 




B40 


S-l 


! T»INT(RND*iO*3! 


BSO 


IT-I 


T<RND«10*2) 




TF-INT(RND»10»31 


B70 


FFl-INTIRNO*10*41 


880 


CALL 


VCHARI4, 16,33,211 


B90 


CALL 


VCHAR(4. 17,33,21) 


900 


S-I 






CALL 


SPRITE<»13, 112,2,43, 121) 


920 






930 




LE JEU 


940 








FOR TH-0 TO 6 II DISPLAY ATI3.11BEEP 


SIZEI4) 


"PRET" :: DISPLAY AT (3, 1 ) SIZE (4 




it NEXT TH 


960 




KEY(!,LD,MM)i : IF «H-0 THEN 960 


970 






990 


' BOUCLE PR1NCIRALE 


990 






1000 FOR 


1-0 TO T :i CALL MOTION l«B, 0, I , 


•7,0, I): 


NEXT I 


1010 FOR 


N-0 TO IT :: CALL MOTION 1*10, 0, 


N, a9,0,N 


: i NEXT N 


102< 


FOR 


tt-0 TO TF :i CALL MOTION I •] 1 . 0, 


-TF 


•12,0, -TF) : : NEXT M 


103i 


FOR 


B-0 TO -PR STEP -1 is CALL MOTI 


0N(( 


•3.0. 


FR,«6.0,-FR):i NEXT B 



1040 FOR MO#.-Cl TO IO n CALL JOYSTd.l 
AND «-0 AND Y--4 THEN H-l 
>0 AND Y--4 THEN M-2 
O AND Y--4 THEN H-3 
O AND Y-4 THEN H-4 i 
THEN H-3 i 



1030 IF 9- 

OOTO 1230 
1060 IF S-2 AND 

BOTO 1230 
I07O IF 5-3 AND 

GOTO 1230 
I08O IF S-2 AND 
OOTO 1230 

I09O IF S-3 AND l-O AND 
GOTO 1230 

1100 IF S«4 AND X-O AND Y-4 THEN H-6 
GOTO 1250 



1110 CALL POSI 


I0Nlf6.XI.Vl) 




1 120 IF Yl >-12 


AND Y11 135 AND(NOT 




HEN GOTO 1340 






I 130 CALL POSI 


I0Nra8,X2,V2) 




1140 IF Y2>-12 


AND Y2T133 ANDINOI 


S-l 


HEN GOTO 1340 






I ISO CALL POSI 


I0NI410, X3. Y3> 




1160 IF Y3)-12 


AND Y3( 135 AND'NOT 


■j ' 


HEN GOTO 1340 






1 170 CALL POSI 


I0N<«12,X4,Y4) 




11SO IF Y4>-12 


AND Y4'135 ANDtNOT 




HEN GOTO 1340 






1 190 SC0RE-5CO 


E*l il DISPLAY AT 11 


1)S 








1200 NEXT HG»' 


I T-T*l it IT-IT*) 


1 Tl 


TF*1 tl FR-FR. 











.•6,0, -FRI : j GOTO 1040 

1220 • 

1230 ■ DFPLACEItENT 

DU MONTE CHARGE 
1240 ■ 

1230 ON H GOTO 1260, 1 270, I 2BO, 1 290, 1 ! 
1270 

1260 CALL L0CATE(I13,B3.I21):: S-2 :: 
TO 1040 

1270 CALL LOCATE («13, 123, I21)n S-3 : 
OTO 1040 

1280 CALL LOCATE C«t3, 163, I2I)i I S-4 I 
OTO IO40 

1290 CALL L0CArEI«13,43, 121) :i S-l t; 
TO 1040 
1300 GOTO 1040 
1310 ! 
1320 ' FAUTES 



,0.0) 

1330 A-300 

1360 A=A-1 :: CALL SOUNDt-20, A.O) : r CALL 

P0SITION(»13,MN8,BNt1) : : IF HNBM90 THEN 

1380 
1370 GOTO 1360 
13B0 CALL DELSPRITE <ai 31 
1390 ERREUR-ERREUR* 1 i: IF ERREUR-3 THEN 

1960 
140O XG-S-ERREUR :: DISPLAY AT(1,20)SIIE 
(6>iRPT»rv.XG-I) 
1410 GOTO 720 
1420 ■ 

1430 • PRESENTATIONS 

1440 ' 

1430 CALL SCREEN(14):j CALL HCHARIIO.1,9 
4,32):: CALL HCHARf 1 1 , 1 , 97, 32) : : CALL MC 
HARI12, 1,97,32):: CALL MCMAR C 13, 1 . 98, 32) 
1460 CALL HCHARU6, 1,94,32) : : CALL HCHAR 
(17,1,97,32):! CALL HCHARUB. 1 , 97, 32) : i 
CALL HCHARI19. 1,98,32) 

1470 CALL SPRITEIB25, 100, 2. 63, 23, 0, 3. »26 
, 104, 9, 63, 24,0, 3, »27. 100,2, 63, 240. O, -3, B 
28, 104,9,63.239,0,-3) 

14BO CALL COINC(»25,a28. IB.JKLtl I IF JKL 
-O THEN 14B0 ELSE CALL DELSPRITE (ALL) : i 
CALL SPRITE<»1, I2B, 16,60.130) 
1490 CALL MAGNIFY(4):: FOR FP-1 TO 2 II 
FOR 2-116 TO 132 STEP 4 it CALL SOUND (10 
0,-6,O)t: CALL PATTERN (•!, I) i i NEXT Z :: 

NEXT FP M CALL MAGNIFY(2) 
13O0 CALL DELSPRITE(ALL) It CALL SPRITE!* 
1,67,2,60, 1 30, -4,-4, »2, 79, 2, 60,130, -4, 4 1 

1310 CALL SPRITE(»3. 76,2,60. 130, 4,4, •«. 6 

3,2,60, 130,4,-4) : i 

1320 FOR HY-0 TO 600 II NEXT HY n CALL 

DELSPRITE (ALL) : : CALL MAGNIFY(3) 

1330 CALL SPRITE(»23, 100,2. Ill, 23, 0.3.B2 

6, 104,9, I 1 1,24,0, 5, «27, 100,2, 111,240,0,- 

3,»2B, 104,9, 111,239,0,-3) 

1340 CALL C0INC(a23,«2fl. 1B.JKL) ■■ IF JKL 



-0 THEN 13*0 ELSE CALL DELVWITEIALL) II 
CALL SPRlTCiai, 178, 16, I10.I3O) 
1330 CALL HASNIFV(4(i i FOR FP*t TO 7 li 
FOR 1-116 TO 132 STEP 4 it CALL SOUMXlO 
0,-6,0111 CALL PATTEftN<ei,Z)n NEXT I || 

NEXT FP ii CALL nA0HIF*(7, 
1360 CALL DELSPRITE<ALL)I1 CALL SPRITE (• 
1,90.2.110,130. -4, -4. •2,73.2.110.130,-4, 

1570 CALL SPRITE(a3,84,2, 110. 130,4 4) 

13BO FOR MY-0 TO BOO li NEXT HY it CM.L 

DELSPRITEIALLIn CALL nASNIFy(3t 

1390 A«-~4»FALffrE*4aFRANC!S«>4PRESENTEja 

aaCOALaPITaa- it CALL TEXTE'Aa.ui 

16O0 FOR TVU-1 TO 2 II CALL SOUNDdOO,44 

0,5,880,5)11 CALL SOUND I 100, 446,3, 937, 5) 



HEX" 



TYU 



1610 CALL 9OUND(80O,440.2.Bao.2)ii CALL 

S0UN0(2O0, 392,0,784,0) ii CALL SCUNDI200. 

349,0.698,0111 CALL SOUND! 200, 330. -j, 659. 

O) 

1620 CALL S0UNDI200, 294, 0,387. 0)11 CALL 

SOUN01BO0, 277, 0,334, Olit CALL SOLMDdOOO 

,294.0.3B7,0)ii CALL CLEAR 

1630 GOTO 490 

1640 CALL SCREENM4) 

1650 CALL HCHAR (10. 1.97.32) 

1660 CALL HCHARI4. 1,97.32) 

1670 CALL KHARIS, 1,97,32) 

16BO CALL HCHARI3, 1,97,32) 

1690 CALL HCMAfl(6. 1.99.32) 

1700 CALL HCHARI3, 1,96.32) 

1710 CALL HCHAR (11, 1,97,32) 

1720 CALL HCHARM2, 1.97,32) 

1730 CALL HCMARI9. 1,94,32) 

1740 CALL HCHAR I 13, 1,99,32) 

1730 CALL 5PRITE(B20. 100,2,33,230,0,-10, 

B21 , 104,9,33,249,0,-10) 

1760 DISPLAY ATC22.8) i "••• (c) -I984«»»- 

1770 DISPLAY AT(I3,9)t*l POUR LE JEU" n 
DISPLAY AT(17, B)i-2 POUR LES REGLES" it 
DISPLAY AT(19,B)t-3 POUR LA FIN" it DI5 

PLAY ATI4, ll)SlZE(8)fCOALaPIT- 

1780 RESTORE 

1790 FOR D-l TO 42 : J READ A t; CALL SOU 

ND(200,A.O) :i CALL KEY (O.GM.L I ) 1 1 IF LI* 

>0 THEN 1820 

1 800 NEXT 

1810 GOTO 17B0 

1B20 IF GH-SO THEN 1870 ELSE COLL CLEAR 

:: COLL DELSPRITE(a20,a21) : : IF GH-31 TH 

EN END 

1830 GOTO 3O0 

1840 • 

1830 ! REGLE DU JEU 

I860 • 

1370 A*-"AU*CaEURdD*UNE4mlNEaDE*CHARB0N« 

SEdTROUVEsUNiMONTEaCHARGEataDESjCNAftlOTS 

aREnPLISjDEaCHARBON«ARRIvENT»DE«PLUS«EN* 

PLUS*VlTE4*a«" 

1880 CALL TEXTE(A»,U) 

1890 A«--CIN0aERREURS«SEULEriENT«VOUS*S0N 

T.PERMIS£Sa**»LE*SCOREaEST*L)NaTEHPS*OUIa 

SaECOULE«AVANTaLA«PERTE*DU*CINOUIEMEaHON 

TEaCHARGE" 

1900 CALL TEXTE(A*,11) 

1910 A«--LDRS*DUaDEPLACEnENTaDUaWONTE*CH 

ARGEaLEaTEHPSaSaECDULEanOINSaUITEaaaaaBO 

NNEaCHANCEa" t: CALL TEXTE(A».ll) 

1920 GOTO 1770 

1930 • 

1940 ' FIN DU JEU 

1930 ! 

1960 CALL DELSPRITE(ALL) 1 t A«-"FlNaDU*JE 

Ua" il SCORE-0 

1970 CALL TEXTE(A«,3) It CALL CLEAR n SC 

ORE-0 i t ERREUR-0 I I GOTO 1640 

1980 ! 

1990 ' DATA MUSIOUE 

2000 ' 

2010 DATA 294,392,440,494,494,323,494.44 

0, 494, 494, 440, 392, 392, 440, 392, 440, 392. 29 

4 

2020 DATA 294,392,494.387,387,387.639,38 
7.494,323,494,440,494,494,494,440,392,44 " 
0,440.392,440,494,440.392 

2030 ' 

2040 ! SOUS -PROGRAMME 

203O ' 

2060 SU8 TEXTE(Aa.W) ti rtt-FVPT »(".", 20) LO 

• 

207O FOR I-l TO LENfA«l*l tl DISPLAY ATI 

U,8)8IZE(16>iSEG«(A«, I ,LEN IA«) - ( I - 1 ) I %HP 

7*t-»", 17li : NEXT I ( 

20 BO ? 



COMBAT AERIEN 



Aux commandes de votre chasseur, vous devez abat- 
tre tous les avions , violant votre espace aerien, quelle 
que soit leur nationality. Votre stock de munition est la 
seule limitation au temps de la partie. 
Si vous battez le score precedent, vous aurez une par- 
tie gratuite. 

Pierre Yves DURAND 

Attention, ne pas faire d'erreurs dans les 13 premieres lignes qui 
permetlent de positiooner Tappareil ennemi sur I'ecran. 
Faire RUN ENTER. Vont s'afficher les differents appareils ennemis 
que vous pouvez rencontrer au cours d'une partie. Va ensuite s'afli- 
cher lappareil que vous devez tout d'abord abattre puis sa position 
par rapport a votre appareil le premier chiffre represente Jangle que 
fait I'appareil ennemi par rapport a vous sur I'axe vertical. Si ce 
nombre est positif, I'appareil est au-dessus de vous II faudra done 
monter en appuyant continuellement sur la touche 2 jusqu'a ce que 
ce nombre devienne egal a 0. 

Le deuxieme nombre represente Tangle que fait lappareil ennemi 
avec vous sur un axe horizontal. Si ce nombre est positif, lappareil 
ennemi est situe a votre drorte. II faudra appuyer sur la louche 6 
jusqu'a ce que ce nombre soit egal a Lorsque les 2 nombres sont 
egaux a (avec une tolerance de quelques degres pour le 
deuxieme nombre: en fait il faut que i'appareil ait une partie sur la 
17° matrice d'atfichage), vous pouvez tirer en appuyant conlinuelle- 
ment sur la touche 5 L'ordinateur vous dira alors si vous avez fait 
mouche ou non Vous disposez au depart de 250 obus que vous 
tirez 10 par 10. Lorsque vous n'avez plus de munitions, la partie est 
terminee. Votre score depend du temps que vous aurez mis pour 
abattre I'adversaire (attention, certains appareils doivent etre tou- 
ches plusieurs fois). 

2 — Monter, 8 — descendre. 4 -. A gauche. 6 — A droite. 7 -• 
conjugue Taction de 4 et de 8, 9 — conjugue Taction de 8 et de 6. 3 
— conjugue Taction de 6 et de 2, 1 — conjugue Taction de 2 et de 

Si jamais il vous arrive de depasser les 9999 points, il taut rajouter 
un # de plus au Using de la ligne 220 et de la ligne 210. 
Si vous trouvez le jeu trop facile, remplacez les deux conditions sur 
P ligne 130 par: 130 IF l= andj= PRINT... 



PC 



125A 




Le 27 julllftt, un numero 
quadruple pour l« prlx d« 3 
numeros. 4 programrrws 
par ordlnnteur, 64 pages! 
24 Irnncs chez votre mar- 
chand de Journaux. 



Cl»* : aaiT 38i 


-0*0— s f-14 Ton-ca 


l'19*4! GOTO 99 


132: IF T)8 AND ">9 GOTO 


197: INPUT 'UNE aUTBE Cofl 


USING 'IHI'I DIN F» 


T 


86i IF k-4 LEr p«i/ 18 ,j, 


143 


TI£<0/N) MZtl IF 2f 


(l3>*13fC*(7)*« 


26ifW38iS'9 


GOTO 99 


US: IF H>9 GOTO 39 


«-Q' GOTO 26 


!*C)>* •:J*(3)»' ■ 


J91W0IT SOiL-aiB-a:)!* 


98tIF P(9 ob p-,13 LET p 


I33iIF H-8 P»IHT -HUMITI 


198! IF ZBa'H- £MB 


«l*(5)«* *iff(«>>* 


INT ( BUD 9>-ll tF K 


•» 


OHS EPUISEES-: GOTO 


1991 GOTO 197 


•iBI<3).' *i 


-3 GOTO JB 


I98JPRINT j;[!* 'iBtrp); 


229 


299:US1NG *II|I*I UAIT 9 


B«6j«' 


52; If <■« OS K-I LET T» 


C*(K)1L-L*1 


137:PR!NT BI<7)S'GaHE OV 


8:l« u -L! PRINT 'TE«P 


a*<7)-' *ibi<8 


l!ft-3tU'2:v.2e 


183! 2I.":ZI. tNKEYt 


EB'i GOTO 197 


S RESiaHTi'lL! IF L 


..- -:B*(9)»S 


J4MF f*2 LET T«1!A-S=U 


H8i:f zi.-e- gosub 12a: 


:*8:G0SU3 188 


<«8 PBINT -POS BE BO 


l'*>*Bl(3>!E*ii«)-M 


•3lV"2fl 


GOTO 148 


M5:0>8!F«8:G"8!E« »NTJ 1 


NUS'!B>9i GOTO 718 


13)*I«S) 


J*:IF -:.J LET ra2lB.HU 


IU1IF ZH-2' OOSUB 1211 


8! IF E>3 LET D-18! 


283:B<L*ie! PRINT 'BONUS 


|f< Il)-M<5>+I*(6)fj 


•41V-4A 


GOTO 148 


GOTO 133 


i-iLi'.ie-'is 


I'12)-BI(6)*3»<6':!* 


S3: IF <«a lET T.4!fl.(j!U 


II2HF Z$.'*' GOSUB 1221 


138!G0T0 75 


2I8iU>U*l88: PRINT 'AVIO 


(U)-BI(7>*BI(S):BI( 


■3iv»se 


GOTO 148 


135:E« PND 18i IF E<3 


H OBBTTUi Mill* "S* 


!4)">f(7)*l*(7) 


48! IF "'j OP K»6 LET Ta 


HSilF Z««*«* GOSUB 12J! 


LET D— a 


!S«S»U*BI PRINT 


3l';?»»Bf«7i*8«(8) 


Jtft.J!U.4lV^9 


GOTO 148 


168!E» »ND 19! IF E>5 


USING Mttll'l'SCOBE 


c«(e>«*«a-*;ci<:)«'- 


42!lF KaT LET -■Jift-UU 


II4IIF Zt-*T- OOSUB I2fl 


LET FaOi GOTO 179 


i -SSI* PTS" 


•-*iCI(2i»'--"~*lC« 


•4iV«60 


GOSUB 12H GOTO 149 


165SG-D 


213IU31NG 'Mtt'l RETURN 


(}.>■•-. aO«— NCf(4)a 


58! If C-J 0» *" LET j. 


113MF Z*.*9* COSUS 1291 


178:]«I'FiJ.J.G! GOSUB I 


228IPB1NT USING •IIIII'l 




10. ihT •■ BSD 3<: 


GOSUB 121! GOTO 148 


88 


•SCOBE'MS: IF S>N 


CftSJa'-OtO-'iCK*)" 


OOTO 6a 


1 16* IF 2t«'f GOSUB 1211 


[731COT0 75 


LET H«St PBINT "PfiBT 


•-O-O-'iCK?,--— 0*0 


MiJ«l9« IH' I °fO <t< 


GOSUB !22i GOTO 149 


1891 IF t>-l89 LEI I-t-S« 


IE GftaTUITE'i USING 


-- 


68=C» »NS 18! IF C<3 


HTlIF ;i»-j- OOSUB 1211 


9 


'llll'l STOP i GOTO 


POINT ' CO"BAT A 


LET J- -J 


GOSUB 1251 GOTO l"4a 


182: IF jr.-isa LET I -f *3 


26 


EOIEn': »pinT ■ {,? 


6)1 t>l8* IMf 1 e >'D ^' ; C 


1I8!IF ZI--3* LET n.n-i9 


69 


223JGCT0 137 


p^*£!l5 ENKfiHISi 


- *h3 :9i IF C(3 LET 


1 GOTO ;» 


I84HF ;>-l88 LET J-J-I4 




P(l[Hl "••■ 1 S'.f'ii.f 


I — I 


H9IG0T0 i*a 


8 




1 pniin ■-•- i COCKE 


78:P»It** 'AWGRMItC : 


I29:;*J*:9i RETURN 


186: IF .K- -189 lET Jaj*j 




•WjLF 


■ i r i ■ ' ■ 


L2tU*J-ltl PETurh 


69 




Win! •--•-- : "€SSE 


73HF J<>9 LET P-ISi 


122: [al*iei RETURN 


199iRETuRn 




ftsc»nr ie9-i p»in? 


GOtO 188 


I2JH'l-l8t RETURN 


191: V- INT ( RND 4,i 




---•0»-- : %-2d "tlPA 


391 IF K>9 OH K-l LET P. 


I J(J: :F R'-a AND Pv3 


GOTO 191 • r 




aDW'i "o|«T -—..t). 


Me**i GOTO 99 


RBIhT • ••• TOUC 


192U«I*29:J'J*28 




•-- ( B-I7 


82i IF fl 0» K»3 0* K-6 


ME M-l! GOSUB 


lM:I«I-29tJ-J*28 




pjttHf *-(Wj. : c-;5 


LE' P--I/;9*3t GOTO 9 


:91s IF T«8 PBINT • 


I94iI«I*28!J'J-28 




EAGlC'i P9I--T ■-o*o- 


3 


EshEnl DESCENDJ'! 


19SII-I-28U-J-29 




i -rc :t: WW ■• 


84HF if-J OS K«7 LET P. 

6 


GOSUB 238 


196!R£TuRh 


■ 



POLE POSITION T 




ILS SONT TOUS LA ! 

Retrouvez chez vous les super-stars desjeux d'arcade d'ATARI, 
ils sont tous la : des celebrissismes PAC-MAN ou GALAXIAN 
jusqu'aux recents JUNGLE HUNT ou POLE POSITION. Le gra- 
ph isme, les couleurs, la rapidite : tout y est, II ne manque que le 
monnayeur et i ambiance enfumee des cafes ! 



ETTOUJCURS 
10 %DE REMISE 
POUR LES ABONNES ! 



GALAXIAN 

D'innombrables hordes 
dextra-terrestres en rang 
d'oignons se pressent sur 
tous les ecrans de tous les 
ordinateufs du monde pour 
se taire descendre par des 
tirs de laser implacables, ils 
sont tous des enfants de 
SPACE INVADERS et de 




GALAXIAN. 



mais qui a ja- 



mais fait mieux que les es- 
cadrons de GALAXIAN qui 
attaquent de tous cdtes et 
obeissent a un chef ? A bas 
le rectiligne ! 



ROBOTRON 

Plus on avance dans les ta- 
bleaux du jeu et plus il y a de 
monde pour vous attaquei 
et, comme ii faut se depla- 
cer et choisir la direction de 
tir de votre anti-robot lasei 
gun avec le meme joystick, 
il vous taudra un grand en- 
trainement pourarriveraux 
25.000 points qui vous don- 
nerons droit a une vie sup- 
plemental. 



DIG- DUG 

DIG-DUG, le petit mmeur. n'a que son scaphan- 
dre et sa pompe a velo pour aneantir Pooka - la 
taupe hargneuse - en la gonflant d'air jusqu'a ce 
qu'elle eclate. Mais Fygar le dragon et ses freres 
cracheursde feu sont aussi la pour I'empecherde 
recuperer les fruits qui parsement le sous-sol. 
Peut-etre arrivera-t-il a les ecraser avec des ro- 
chers ? 



PORT GRATUTT ! 



CENTIPEDE 

La commands par boule 
qui actionne cejeu dans les 
cafes est difficile a manipu- 
ler. Avec un joystick ou me- 
me avec le clavier le jeu est 
encore plus attrayant : Les 
mille-pattes zigzaguent a 
travers I'ecran, la puce dia- 
bolique seme des champi- 
gnons partout face a votre 
pulverisateurde DDT, sans 
oublier les araignees sau- 
teuses et fes scorpions ve- 
nimeux ! 




DEFENDER 

Difficile de prevoir d'ou va 
venir le coup, du haut, du 
bas, de la droite, de la gau-' 
che ? Lequel des 14 enne- 
mis presents va attaquer le 
premier ? Dois-je aller en 
avant ou en arriere, accele- 
rer ou freiner, voler en rase- 
mottes ou zigzaguer ? Utili- 
ser mes lasers ou une de 
mes trois smart bombes ? 
Aussi dur degagnerque sur 
I'original mime avec le 
scanner ! 





MS, PAC-MAN 
La petite amiede PAC-MAN 
a beau avoir une faveur rose 
dans les cheveux et user de 
tous ses charmes, elle n'en 
a pas moins les pires ennuis 
avec les quatre fantomes 
qui la poursurvent. Et il lui 
faut, oilo aussi. errer dans 
un iabyrinthe en croquant 
des pastilles d 'energie 
bleues Ce nest pas une 
vie. meme pour un glouton 
femelle ' 



MOON PATROL 

Qui neconnalt la petite jeep 
bondtssante au-dessus des 
crateres, pulverisant les ro- 
chers. aba ttant les meteori- 
tes, evitant mines, tanks. 
ovnis et plantes carnivo- 
res ? Deux nrveaux ; novice 
et expert de 26 etapes cha- 
cun. Tous les 10.000, 30.000 
et 50.000, vous gagnez un 
vehicule de patrouille sup- 
plemental. Objectrf : pro- 
tection planete Lune ! 




DONKEY KONG 
Mario, le charpentier. es- 
saie desesperement d'arra- 
cher sa fiancee des pattes 
de Donkey Kong, le gorille 
geant qui la retient captive 
tout en haul d'un amas de 
poutrelles brisees. II lui faut 
affronter des cascades de 
tonneaux, demonter des ri- 
vets, emprunter des ascen- 
seurs fous ou encore errer 
dans un dedale de tapis 
roulants charriant des ba- 
quets de sable. Dur. dur ! 




POLE POSITION 

D'abord les essais pour sa- 
voirousera place votre bo 
lide sur la grille de depart, 
puis c'est la course propre 
ment dile, virages serres. 
crissements de pneus et 
accidents avec voitures en 
flamme ! Graphisme, cou 
leurs et trois dimensions, la 
star des jeuxde cafes 'Trois 
niveaux de difficulty, deux 
vitesses et des compteurs 
partout ! 




JUNGLE HUNT 
Sauter d'une liane a I'autre. 
depouiller des crocodiles, 
se faufiier sous des blocs de 
pierre, enjamber des ebou- 
lementset affronter desau- 
vages cannibales alors que 
vous n'etiez qu'un amou- 
reux transi et oisif ? C'est 
peut-etre la vue de votre 
petite amie en (rain decom- 
mencer a cuire dans cettes 
marmite qui vous a change 
ainsi 1 

STAKGATE 

Plus rapide. plus difficile 
que DEFENDER, presque 
mjouable ! Les ennemis 
sont innombrables. plus ra- 
pides et plus soumols les 
uns que les autres et I 'hy- 
per- espace n' arrange pas 
les choses. elle ne fait que 
retarder votre disintegra- 
tion ! Esperons que vous ar- 
riverez tout de meme a sau- 
ver quelques-uns des hu- 
manoi'des qui comptent sur 
vous pour rent rer chez eux! 



TOUS LES JEUX FONCTIONNENT AVEC LE CLAVIER OU 
AVEC LES MANETTES DE JEU. 



JOUST 

A califourchon sur une au- 
truche. une lance a la main. 
vous combattez les buzar- 
diers sauteurs. chasseurs 
et seigneurs. Mais ne 
croyez surtout pas que ga- 
gner une bataille sutfit, les 
vaincus pondent des ceufs 
de frustration qui sont en- 
core plus dangereux si vous 
avez le malheur de les lais- 
ser eclore La joule est ou- 
verte ! 





PAC-MAN 

Le seul. I'unique. I'incompa- 
rable : toujours copie, ja- 
mais egale 1 19 tableaux drf- 
ferents, de la cerise a la cle 
en passant par les citrons et 
les cloches. Blinky le rapi- 
de. Pinky le soumols. Inky le 
malin et Clyde qui vous 
coupe le passage, vous at* 
tendent. Si vous atteignez 
10 000 points vous gagnez 
un tour gratult et lo record 
du monde est a battre ! 



TABLEAU RECAPITULATIF DES PRIX (PORT COMPRIS) 
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VIC 20 luoouua 


315 


355 


335 


355 


335 


355 
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315 


335 


335 
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COMMODORE 

64 IMOOUtf) 


345 


395 


365 


395 


365 


395 


345 


395 


345 




365 


365 
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375 




375 




345 




345 




345 
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400 


430 


400 
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380 
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405 
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MONTANT a pay«f 
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NOUS AVONS BESOIN DE VOUS! 



Remplissez et renvoyez-nous ce questionnaire, cela 
nous permettra de (aire un hebdo encore plus attrayant 
pour la rentr&e; c'est dfya vous qui ecrivez les pro- 
grammes et qui votez pour les gagnants des deux 
concours, c'est un peu normal que nous fassions 
connaissance et que vous nous donniez votre avis, 
non ? Et pour ne pas vous lake travailler pour rien, 
nous tirerons au sort 40 questionnaires qui gagneront 
une machine «J calculer Casio ou un des logiciels du 
Soft-parade. 





20 MACHINES A CALCULER 
et 20 LOGICIELS A GAGNER. 



QUELLES AUTRES REVUES D'INFORMATIQUE 
LISEZ-VOUS ? 

De temps en temps Souveni Regufcersment 



Ce questionnaire est destine a un usage interne, H ser- 
vira a am&iorer les prochains numeros d'HEBDOGI- 
CIEL. II est confidentiel et ne sera pas diffuse', sous 
aucune forme que ce soil Vous pouvez, si vous le de- 
sirez, remplir le bon de participation ci-dessous et parti- 
ciper au tirage au sort sans repondre au questionnaire. 
Des tons de participations sont dgalement disponibles 
en 6crivant & la redaction. Si vous voulez que votre 
questionnaire reste anonyme, ne remplissez pas le bon 
de participation mais repondez au questionnaire et ren- 
voyez-le nous.ca nous rendra bigrement service. 



Sciences et vie mtcro 






Micro 7 






Micro systemes 






Micro-ordinateurs 






Micro et robots 






List 






36.000 micros 






L'ordinateur indrviduel 






Voire ordinateur 






Tilt 






L'ordinateur personnel 


















GokJen 












Ordi-5 












Trace 






Autre, lequel... 







QUESTIONNAIRE LECTEURS ENVISAGEZ-VOUS D'ACHETER UN ORDINATEUR ? 



DEPUIS QUAND LISEZ-VOUS HEBDOGICIEL? 

Deputs le premier numero Q 

Depuis le numero (precisez le N* ) 

C'esi la premiere lots que je le lis D 

LISEZ-VOUS REGULIEREMENT HEBDOGICIEL ? 

Oui. toutes les semaines D 

Oui. tous les 15 jours D 

Oui, au moms une fois par mois Q 

C'est la premiere tois que je le lis a 

Non. je ne le lis que de temps en temps D 

COMMENT AVEZ-VOUS CONNU HEBDOGICIEL ? 

Par un stand du Stcob D 

Par un stand de Micro-Expo □ 

Par Sciences et we Micro D 

Pa/ Micro 7 □ 

Par 36.000 Micros de Microtel □ 

Par un autre journal, lequel D 

Par une emission de Tele, laquetle D 

Par une emission de Radio. laqucNe q 

P^r des amis . .... □ 

A I'ecote. au lycee. a I'unrversrte , □ 

Dans votre acttvite professionnelle ... q 

En le decouvrant chez le marchand ..... a 

Par un autre moyen. lequel □ 

OU VOUS ETES-VOUS PROCURE CE NUMERO ? 

Je lai achete dans un kiosque O 

Je lai achete dans un© maison de la presse ... D 

Je suis abonne D 

C'est le journal de mon club dinformatique D 

C'est le journal de lecole D 

C'est le journal d'un ami q 

C'est une photocopte ... □ 

Je I'ai eu par un autre moyen, lequel □ 

OU ACHETEZ VOUS HEBDOGICIEL ? 

Toujours au meme endroit □ 

N'imporle ou □ 

Je le trouve tres faolement □ 

Je le trouve difficilement q 

Ou habitez-vous, ville et departement q 

QUI LIT VOTRE HEBDOGICIEL ? 

Je suis leseula le lire O 

Une autre personne D 

Plusieurs personnes, combien 

QUE FAITES-VOUS DES PROGRAMMES DHEBDO- 
GICIEL ? 

Je les tape toutes les semaines a 

Je les tape regulierement O 

Je les garde pour les taper plus tard □ 



Non c 

Oui. quelle marque, quel modele 

ENVISAGEZ-VOUS DE CHANGER VOTRE ORDINA- 
TEUR ? 



Non 

Oui. pour quelle marque, quel modele .. 



COMBIEN DE LOGICIELS POSSEDEZ-VOUS ? 

Logiciels dejeux tapes par vous-meme 

Logiciels de jeux du commerce achetes 

Logiciels de jeux du commerce copies 

Logiciels utilitaires tapes 

Logiciels utilitaires achetes 

Logiciels utilitaires copies 

Logiciels profess ion nels tapes 

Logiciels protessionnels achetes 

Logiciels protessionnels copies 

QUEL EST VOTRE AVIS SUR LES RUBRIQUES 
DHEBDOGICIEL ? 



POSSEDEZ-VOUS DES EXTENSIONS POUR VOTRE 
CONSOLE ? 



Non 

Oui. 

Lecteur de cassettes, marque et modele 

Television noir et blanc, marque et modele 

Television couleurs, marque et modele 

Moniteur noir et blanc, marque et modele.. 

Moniteur couleurs, marque et modele 

Un lecteur de disquettes, marque et modele 

Deux lecteurs de disquettes, marque et modele.. 

Imprimante (hermique. marque et modele 

Imprimante graphique, marque et modele. 

Imprimante d impacts, marque el modele 

Imprimante a marguerite, marque et modele 

Modem, marque et modele ... 

Autres. lesquels. marque et modele 



ET ENVISAGEZ-VOUS DACHETER DES EXTEN- 
SIONS ? 

Non □ 

Oui, d'ici a fin octobre 1984 □ 

Oui, d'ici a la fin de I'annee 1984 q 

Oui, dans le premier trimestre 1985 q 

Oui. plus tard q 

Si oui, quels seront vos achats ? 

Lecteur de cassettes, marque et modele 

Television noir et blanc, marque et modele. 

Television couleurs, marque et modele 

Moniteur noir et Wane, marque et modele 

Moniteur couleurs, marque et modele 

Un lecteur de disquettes, marque et modele 

Deux lecteurs de disquettes, marque et modele 

Imprimante thermique. marque el modele. 

Imprimante graphique. marque et modele 

Imprimante a impacts, marque et modele 

Imprimante a marguerite, marque et modele 

Modem, marque et modele 

Autres, lesquels, marque et modele 



BON 


MOYEN 


NUL 




























































































QUELLES SONT LES RUBRIQUES QUE VOUS Al- 
MERIEZ VOIR RAJOUTEES A HEBDOGICIEL ? 











DUNE FACON GENERALE QUEL EST VOTRE AVIS 
SUR HEBDOGICIEL ? 



CONTINUEREZ-VOUS A LIRE HEBDOGICIEL ? 

Oui. regulierement n 

Oui, de temps en temps. Q 

Peut-etre o 

Non. pourquot □ 



DEPUIS COMBIEN DE TEMPS TAPEZ-VOUS DES 
PROGRAMMES INFORMATIQUES ? 

Plus de 2 ans q 

De t a 2 ans □ 

Plus de6 mois p 

Moins de 6 mois q 



QUELS PROGRAMMES D'HEBDOGICIEL TAPEZ- 
VOUS? 

Les programmes pour mon ordinateur ... □ 

Je les tape tel quel 

Je les ametiore 

J'adapte les programmes des autres ordmateurs 

Je travaille seul 

Je travaille avec d'autres personnes 



QUEL EST VOTRE NIVEAU ? 



(] 



SUR QUEL MATERIEL TRAVAILLEZ-VOUS ? 

Sur du materiel qui m'appartient,, □ 

Sur du materiel que Ton m'a prete G 

Sur le materief de mon ecole □ 

Sur le materiel de mon club d'informatique D 

Sur le materiel de mon lieu de travail ,,.n 

SUR QUEL ORDINATEUR TRAVAILLEZ-VOUS ? 

Marque 

Modele 



Debutant [ j 

Amateur initio Q. 

Amateur eclaire q 

Professionnel n 

QUEL LANGAGE CONNAISSEZ-VOUS ? 



QUI ETES-VOUS ? 

Sexe mascutin o 

Sexe leminin O 

Votre age 

SI VOUS ETES ELEVE OU ETUDIANT, 

votre classe 

I'activite professionnelle de vos parents 

SI VOUS TRAVAILLEZ, 

voire profession 

votre secteur d'activite 

votre niveau d'etudes 

votre niveau de remuneration annueWe 



Debutant 

Aucun 

Basic 

Pascal 


Chovronno 


Profossionnol 


Forth. . 






Logo 

Assombleur 

Fortran 






Cobol 




LSE 

Autre, lequel 





BON DE PARTICIPATION AU TIRAGE AU SORT. 

NOM: 

PRENOM: 

ADRESSE: 

CODE POSTAL: 

SI JE GAGNE UN LOGICIEL AU TIRAGE AU SORT, 
JE CHOISIS DANS LE SOFT PARADE LE LOGICIEL 
SUIVANT: 



DEUX SUPER-CONCOURS PERMANENTS 

10 000 francs de prix au MEILLEUR LOGICIELdu MOIS et un VOYAGE EN CALIFORNIE 

au meilleur logiciel du TRIMESTRE. 



Un concours de plus < 
Ri«n de bien original dans cette 
foimule. pourtant nous es- 
sayons de (aire quetque chose 
de different : nous organisona 
un concerns permanent tous 
les mots et tous les trimestres ! 
Et avec des prix dignes des pro- 
grammes que vous allez nous 
envoyer! 

De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes prefer es sur 
la grille recapitulative men 
suetle. 

Pas de Jury, pas de decision ar- 
bitrage. HEBDOGICIEL n'inter- 
venant que dans le choix des 
programmes qui devront etre 
ORIGINAU X et FRANCAIS Si 
voire programme n'est pas tout 
a (ail au point, un de nos spe- 
cialistes vous dira comment 
I'ametiorer pour pouvoir nous le 
proposer a nouveau. 



Pour participer, il vous suftit de 
nous envoyer vos programmes 
accompagnes du bon de parti- 
cipation ainsi que toutes les ex- 
plications nee essa ires a I'utili- 
sation de ce programme. 
Bonne chance! 



Reglement 

ART 1 HEBDOGICIEL organise 
de lacon mensuelle el tnmes- 
Irielle un concours dote de prix 
recompensant le meilleur logi- 
ciel du mois et du tnmestre 
ART. 2 Ce concours est ouvert a 
tout auteur de logiciel quelque 
soit le malenel sur lequel il est 
realise L'envoi dun logiciel en 
K 7 ou disquette accompagne 
dun bon de participation de- 
coupe dans HEBDOGICIEL ou 
envoye gratuitement sur de- 



mande par la redaction de noire 
journal constitue I'acte de can- 
didature 

ART 3 La redaction d'HEBDO- 
GICiEL se reserve le droit de 
selectionner sur la base de la 
qualite et de loriginalite les logi- 
ciels qui sonl publies dans le 
journal 

ART 4 Ce sont les lecteurs qui. 
par leur vote, determinent les 
meilleurs logiciels mensuel et 
tnmestriel 

ART. 5- Le prix atloue pour le 
concours mensuel sera remisau 
plus tard un mois apres la clo- 
ture du concours mensuel 
ART 6. Le prix alloue pour le 
concours tnmestriel sera remis 
auplus lard un mois apres la clo- 
ture du concours trimestnel 
ART 7 Le present reglement a 
ete depose chez Maltre Jauna- 
tre. 1 . rue des Halles 75001 Paris 
ART 8 HEBDOGICIEL se reser- 



ve le droit d'interrompre a tout 
momenl le present concours en 
en avisant les lecteurs un mois 
avant 

ART 9: La participation au con- 
cours enlraine 1 acceptation par 
les concurrents du present re- 
glement 

HEBDOGICIEL: 27. rue du Gal 
FOY- 75008 PARIS 

Sera declare gagnant le pro- 
gramme qui aura obtenu le plus 
fort pourcentage de vote par 
rapport a la totaiite des pro- 
grammes recus pour un meme 
ordinateur. 

Ainsi. pas de favoritisme pour 
les ordinateurs plus puissants 
ou tres diffuses. 



BON DE PARTICIPATION 



Nom : 

Prenom . 

Age . Profession : 

Adresse : 

N 3 telephone : 

Nom du programme : 

Nom du malenel utilise : 

declare etre I auteur de ce programme qui n'esl m une imitation m une 
copie dun programme existant. Ce programme reste ma propnete et 
j'autorise HEBDOGICIEL a le publier La remuneration pour les pages 
publie.es sera de 1000 francs par page (un programme noccupant pas 
une page entiere sera remuner6 au prorata de la surface occupee) 

Signature obligatoire : 

(signature des parents pour les mineurs) 

Le programme doit etre expedie sur support magnetique (cassette ou 
disquette) accompagne d'un descn p tif detaille du ma ten el utilise. 
d'une notice d'utilisaiion du prog ramme . Les supports des program- 
mes publies sont conserves , noubliez done pas den faire une copie. 



RECOMMANDATIONS AUX LEC- 
TEURS OUI SOUHATTENT FAIRE 
PUBLIER UN PROGRAMME : 

• Envoyez vos supports, mode 
d'emploi, listings et bon de parti- 
cipation dans une meme enve- 
lope*. 

Vous pouvez nous envoyer plu- 
sieurs programmes sur un meme 
support en lindiquant sur voire 
Bon de Participation 

• N oubliez pas et ceci est tres 
important d'msenre sur vos sup- 
ports votre nom, le nom du pro- 
gramme et le materiel utilise. 
Notez dans les premieres lignes 
de votre programme, sous forme 
de REM. votre nom. le nom du pro- 
gramme et le materiel auquet il est 



destine. Nous pourrons ainsi re- 
perer lacilement les listings, une 
fois sortis de 1'imprimante. 

• Duphquez plusieurs fois sur la 
cassette et a des niveaux d'enre- 
gistremenl differents votre pro- 
gramme. Nous aurons plus de 
chance d'arnver a le charger si les 
magnetophones ne sont pas tout 
a fait compatibles. 

• En ce qui concerne les bons de 
participation, mettez voire adres- 
se com plete et votre numero de 
telephone (si vous en avez un). 

• Pour tout envoi tel que "petites 
annonces", "abonnement" et 
"programmes" specifiez sur vos 
enveloppes I'objet de votre cour- 



Ne nous envoyez plus d "envelop- 
pes timbrees, mettez simplement 
les timbres joints a votre envoi. 

• Expliquez les particularites de 
votre ordinateur et le moyen 
d'adapter votre programme a 
d'autres ordinateurs 

• Vu le nombre important de pro- 
grammes similaires que nous re- 
cevons. evitez de nous envoyez 
les jeux suivants : BIORYTHMES. 
MASTERMIND. PENDU. TOUR DE 
HANOI. CALENORIER. BATAILLE 
NAVALE. POKER. JACKPOT. 
BOWLING. BLACK JACK. LABY- 
RINTHS. MEMORY SIMON, 421, 
OTHELLO. SOLITAIRE. LOTO 



LA REGLE A CALCUL RE- 
COMPENSE LES MEILLEURS 
LOGICIELS EN OFFRANT A 
CHACUN DES PREMIERS 
DANS LEUR CATEGORIE UN 
OUVRAGE A CHOISIR DANS 
SON RAYON LIBRAIRIE (EDI- 
TEURS : BORDAS, DUNOD, 
EYROLLES, MASSON, NA- 
THAN, PSI, SHIFT, SYBEX). 



SOUIRELLE RECOMPENSE LE 
MEILLEUR LOGICIEL DU MOIS 
PAR 2 CASSETTES A CHOISIR 
DANS SA LOGITHEOUE. 



Les editions du CAGIRE offrent 
au meilleur logiciel du mois sur 
HP 41, leur livre "nut our de la bou- 
cle" de Janick TAILLAND1ER. 
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REVENOEURS 
NOUS POUVONS VOUS 
FOURNIR TOUS LES LOGI- 
CIELS DE CETTE PAGE A UN 
TARIF PREFERENT1EL. N'HE- 
SITEZ PAS A NOUS CONTAC- 
TS* AU : 16 (1) 29*. 28.50. 



DEMANDEZ LE PROGRAMME 

Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 
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Nous avons selectlonne pour vous les mellleurs loglclela actuellement dhponlbles en France. Nous ne 
pretentions pas que cette Hate est complete et definitive et II est evident que nous v rajouterona regu- 
llerement das programmes au fur et a meture que nout les testerons. Pourtant, vous chercherez en 
vain certains programmes qui loulaaent d'une bonne reputation et qui »e vendent surtout grace a la 
publlclte et aux consells des vendeurs qui ne peuvent pas connaltre lous las logiciels dlsponlbles, 
Nous avons classe A part les logiciels educatllt et, par soucl d'honnetete, nos propret produlta : lea 
Hebdoglclel Software. 

Letprlx ion I. noun I'esperona, les mellleurs du marche surtout pour les abonnes - anclens et nouveaux 
- qui bineflclent en plus d'une remise de 10 %. SI vous etes nombreux a nous aulvre dans cette expe- 
rience nous pourront rapldement arrlver a talre balaaer lea tarlfa dea tournlsseurt pour attelndre 
I'oblectlt que nous nous sommes llxe : ntmener les prlx a une plus juste valeur I 
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4 JEUX POUR UN 
JOUR DE PLUIE 



Heureux Hectoristes! 4 pour le prix dun. En esperant 
toutefois que la pluie ne sera pas au rendez-vous {pour 
I'ete, en tout cas!). 

Marcel BOULE 



Le 27 Julltel, un numero 
quadruple pour le prix de 3 
numeros. 4 programmes 
par ordinateur, 64 pages! 
24 francs crtez voire mar- 
chand de journaux. 



* I INE22. 158.218, 158- 1 LINE218. 192. 1 LIME22. 182. 1 L 

INE22.158- 1 

T MM IMItltllllttMtttltttMtttt '.£6, 114, J 

8 OUTPUT""- OUrtTRE JEUX POUR". 26, 148,2 uUTPUT"UN JO 
UR DE PLUIE -«". 183. 128.2 

9 PAUSE2 

18 WIPE COLORS. 1,2.3 
- 1! LlNE20.22e,220.220.1LINE228.ie,l LINE20.18.1 LI 
NE 28- 228.1 

12 LINE22. 218,218.218. 2 LINE218. 12.2 LINE22. 12,2 LI 
HE22.2I6.2 

13 LINE24.216.216.216.3 LIHE216. 14.3LINE24, 14,3'LI 
NE24.216.3 

> MENU <—*". 64, 218.1 

■ JEU WJ LOTO ->I". 48-168. 2 
JEU fXJ MASTERMIND ->2" , 48. 148, 2 

■ JEU OU CODE POSThl->3". 48, 128.2 

■ JOUR DE cm SErttINE->4-, 40, 188.2 
-INSTR*. 1.' IFA»-"I-THENGOT0214 £LSEIFfl««-2"THE 

NCBT0111 ELSEIFR*--3"TMEHC0r028 ELSEIF*s«"4"THENGGT0 
35ELS£IFA»>-4-THENRRlNTCHRtK7>C,OTOI9 



14 OUTPUT-I 

15 OUTPUT -1 . 
J6 0UTPIJT-2 ■- 
17 0UTPUT"3 < 
19 OUTPUT'4 < 



28 ' 

21 li COCE ^OSTRt 



22 •« tt 

23 WIPE CLS C0LUR8.3.l,6 

24 PL0T28. 228. 288.288. 3 

25 PL0T198.2ie,28.48,8 PL0T192.288, 16,36, 1 .OUTPUT"o 
".198.282,0 OUTPUT"; -.198, 194,8 OUT PUT''H", 158, 186,8 

26 OUTPirT"rU(j«»e OLGrt BFtfDINE" ,76, I4e,2'0UTPUT"I2 
rut du CHAT QUI PECHE", 52, 118,2 .GUTPuT"DfilSY-TQWN", 1 
58.63.2 

27 0UTPUT"D0NNER LE NUMERO DE CODE POSTAL". 24. 14.2 
2S 0UTPUT"DGNNER LE NUMERO DE CODE POSTAL", 25. 15, 1 
29 CURS0P198.65 

39 INPUT A* 

31 CLS'PL0T28,22e.288.2ae.3 PLOT3e.79,2e,48.ePL0T3 
2,68,16.36. 1 PL0T38. 148,1 19,9,9 PL0T38, 128. 158, 8. 8, P 
L0T38. 198,149.8.0 SCPEEN38. 190.198-58 

32 OUTPUT-L'EMVELOPPE DOIT ETRE PETOURNEE" ,24, 14,2 

33 OUTPUT-L'EMVELOPPE DOIT ETRE RETOURHEE" ,23, 15, 1 

34 OUTPUT-H". 37, 63-8 OUTPUT": -.37.56,8 .0UTPUT"o". 37 
.47.8 

35 FOR 1*1 TO 3 

36 FOR _K=8 TO 9 

37 IF VAL<MID»<H».I.1>,-J THEN GOT 038 ELSE G0TQ58 

39 ON M C0T046, 41. 42,43, 44-45, 46, 47. 48, 49 



HECTOR HR 

r*6 PLOTI5,92.228.92,e'0UTPUT-DONHE2 1101 L'hiO(EE",60 
.58.1 OUTPUT'PW «.*.«(,(«■ 1981 mats Pas 81". 49. 38.1 

n ';upsop?9-50. input j 

72 (XS'SCMKO 24 fi-ITPLir-tlOI L'OPt-IUHTElJR JE DIS QU 
E IF " 12.168-3 tXiTPUT D .200- 169-2 OUTPUT"DU MOIS 

Mo". 18.129 :: i-n.lTPt.iTH.tJ9- 12'"'. 2 OUTPUT". DE L' HHNEE" ,9 
?. 128. J OUTPUT I .168.120.2 

73 FLftSHJ.28 SOUHD0.4896 

74 IFrf»2THEH LETJ=J-1 

75 IFM<"2TMEH LETM-MH2 

76 LET E=JNT<'M*1 ,113/3) 

77 LETF-INT<5*J'4> 

78 LETG=IHT< J'188> 

79 LETH=I»T( J/409J 
89 LETT=D+E*F-G*H 

81 LETDfl=IHT!<T'?-IHTi: W>)t7*.i > 

82 PL0T55-92. 114. 14,3 

U3 IFDR=UTMEI«UTPUT-C'EST IJH SfiMEDI " . 68, 88, 1 

84 IFDH=1THEHCUTPUT"C'EST UN DIMftNCHE" , 68.98. 1 

85 IFDfi-2THEN0UTPUT"C'E$T UN LUNDI" . 69, 88, 1 

86 IFDA=3THEN0UTPUT"C'EST UN ttARDI",60.88. 1 

37 IFDA=4TKEN0UTPUT"C'£ST IJH WERtPEDI",60.89. 1 

88 IFDfi=5THEH0UTPUT"C'EST UN JEUOI " .68, 88, 1 

89 IFDR=6THEN0UTPUT"C'EST UN VENDPEDI " , 69. 88. 1 
99 PftUS£2.CLS.Y=!99 

91 FOR X-49T0158STEP 28 

52 LINE35, 219, 195,210,1 LIHE195.90, 1 .LIN£33,98. 1 .LI 
NE 35-219. I 

93 LINE!79,129,159.129,2.LINE186,90,2.LINE174,98,2. 
LINE178- 129.2 

94 Y-Y-10 F"LOTX.Y,20,2,1 

95 NEXT.X-49' 

96 F0RY=298T0149STEP-18 

97 F0RX1=X TOX+18 

98 0UTRUT"o-,Xl,Y,3.0UTPUT"o",Xl,Y.8 

99 NEXT.X-X+28 

199 TONE2*Y,4909'Y.NEXT 
191 F0RY=129T097STEP-5 

182 F0PT=IT018 

183 0UTPUT"o',178,Y,3.0UTPUT"o",178,Y-9 

184 NEXT. NEXT 

185 OUTPUT-o". 178, Yt2, 3 ■OUTPUT-FLOP". 178,88,2. T0NE7 



48 PRINT-IIII 

4t PRIHT-III I •< 

42 PRINT-II II - 

43 PRINT- I III " 

44 PPINT-I1I I- 

45 PRINT-II I I- 

46 PPINT-I II I- 

47 PRINT-II II- 

48 PRINT-I I II" 

49 PSINT-I 



GOTOS0 
GOTOS0 
GOTOSe 
COT058 
GOTO30 
G0T058 
C0T058 
G0T058 
G0T058 

ooTose 

1 NEXT, NEXT OUTPUT"TAPEZ UHE TOUCHE" .98, 44, 9 A»-IN 
STPS* I > 
31 WIPE fJUTPUT-VOUS V0ULE2 REJOUER '--,68,178.3 

52 OUTPUT "0<-0U I oo NON->N" -68, 158,3 

53 CJRS0RI18.38 INRIJTZ* 

54 IF 2*=-N- THEHC0T0246 ELSEIF2»-"0-TMEMGQTOI8 

55 ' ***XXt*IX*tttXX*ltt*Xttt 

56 ' t* JOUR DE Lft SEMmIIC -» 

*;? ■ r.MMntiniiiilrdHij 

58 WIPE COL0R9. 1-2.3 

59 XL-1 YL-1:»188 7=298 
68 F0RC-1T027 

61 PLOTX, r.JO-.YL.C 

62 X-X-2 Y=Y-2XL=XL*6 YL=YL*.4 

63 F0R0-1T018 NEXT NEXT 

64 CCtOPe.1.2,3 IFY>128 TMEMG0T063 

63 OUTPUT-*? JOYEUX mHNIVERSmIRE r=--58. 143, 1 OUTP 
UT-D0NHE2 M01 LE JOUP EH CHlFFPE" .38-58, 1 OUTRJT-'EX 
EHPLE 12 OU 2. >*.68.381 FLfiSHe.5 

66 C0L0P9.3.4.5 C1JRS>3R98.59IHPUTD 

€7 IFD:,J1THEMPPINTCHRV7' G0T066 

*# FL0T15.92.228.92.8 OUTPUT-DOHHEZ HOI LE HOIS EH 
fHIFFRES-.39.59- 1 -OijTPijT-' EXEMRLE 11 W l.>".79,39.1 



179,3 



12.12.CLS3 



186 S0UMD8.4896-C0LaR8, 3,2-1 

197 WIPE:OUTPiJT"VO(JS VO'JLEZ REJOUER ?",68. 

188 0UTPUT-O''-OUI ou HON- >N" . 68, 158, 3 

199 PJRSORlia,30:INPUTZS 

119 IF 2»«-N" TmEHG0T0246:ELSEIFZS="0"THENGOT018 

111 ' ****t*«***tt*tt*«****« 

112 ' *- LE MHSTERMIND -* 

113 ' ttti-tt***r*t*tt*tttxtttx 

114 WIPE^ COLOR0, 1,7,3 

115 '5CREEH14, 224, 204, 219 > CLS1 = FLftSHl , 28 

116 SCPEEN23,205,45.30^CLS3 

117 SCPEEN45,155,118,39'CLS3 

118 SCPEEN139,!93.65.38:CLS3 

119 SCREEM179..30.12,12CLS3'SCREEN33,38,I 
128 PL0T38,288,2.28,1 .PL0T32, 183,8,3, I 

121 PL0T47,28e,2,28,l:PL0T49. 183,8,3.1 PL0T49, 288,8 
, 3, 1-PL0T49, 192-5,3,1 

122 PLOT48-I59.2,28,l.PL0T57,159.2.29,l . * 

123 Y-2 YL=138 

124 F0RX-49T054STEP.4 

125 PLOTX/rt., 1,Y,1 

126 YL-YL-1 

127 NEXT 

128 Y-2^YL»148 

129 F0RX-54T058STEP.4 
139 PLOTX.YL.l.Y,! 

131 YL-YL+1 

132 NEXT 

133 Y-l^YL-131 

134 F0PX-63T071STEP.3 

135 PL0TX.YL.2.Y-1 

136 YL-YL+1 

137 NEXT 

138 Y-l YL-159 

139 F0RX-71T077STEP.3 
149 PL0TX,YL,2.Y.> 

141 YL-YL-1 

142 NEXT 

143 PL0T67, 136.9,3,1 

144 PL0T85, 138. 10. 3,1 'RL0T83, 158,2,18, 1 .PLOT93.140. 
2. 18. 1 <PL0T85. 133, 10,3, 1 PL0T85, 143- 18.3. 1 

145 PL0T184.158,i8.3,l.PLOT188. 138,2,28,1 

146 PLOT121,15e,2,20,lPLOT123,133,8,3,l.pLOT123,15 
8,3.3,1 PL0TI23, 143,4,3. 1 




147 f I nr I 38. 158.2.28.1 PL0T148. 138-8.3. 1 PL0T14C14 
> 9. i. I PL0T146. 158-2. 18.1 
149 Y-2 YL-142 
t.|?< Fr.pv=|4-»Tfil47^TEP.4 
158 PL0TX.VL.2.Y.1 

i-.i a =yl-i 

132 ME>TT 

153 Ft riri?r. 188.2.28. 1 FL0T14«. 188-2.28.1 

■ n."99 

- M;Tr,|46STEP-4 
I5S PI DTK n.. I.V.I 

157 YL-YL»l 

158 ^XT 

159 Y«2 n-198 

168 FORK- 1 »T0143ST£R.4 
161 PtOTX.YL.l -Y.I 

\e-? YL=YL-1 

163 NEXT 

164 PL0T133. 180.2.28,1 

165 PL0T164. 199.2-29. 1 PL0TI7?. lfW-2- >8. i 
ie^. v«2 YL=i9f« 

167 F0PX=|«£T0172STEP.4 

169 PLOTX.YL.l.Y-1 
169 '/T_=-rL-l 

179 NEXT 



172 FLftSH3,28 FLRSH4.28 

173 PnUSEI WIPE 

174 C0L0P9-6.1.4 

175 SCREEH39.ieO. 130.49 CLS1 

176 0>JTPUT-PO<JP JOUEP RPPiJYEP" .68. 158,2 

177 OiJTPUT- SUP UHE TOUCHE -,68,148,2 

178 OUTPUT- ET BOHHE CHfiHCE -.68.189,1 

179 ft»-!HSTP*/ 1 , 
189 CLS. WIPE 

181 SCPEEM35. 239, 175,299 CLS1 

182 LETE-9 

183 LETft-INT(RMD<l,ie>) 

184 LETB-IHT'RNrxi.iev? 

135 LETC=INT'RHD< 1.18>) 

136 LETD'INT'Pf»D'l,19)> 

187 CURS0P48.132 

188 OUTPUT -TR0UVE2 UM MOHBRE DE -.48.228.3 

189 0UTPiJT"4 CHIFFRES DE 1 . 9". 48. 218, 3 
199 INPUT X 

191 LETo=iHT<x/ieee> 

192 LETP-IHT(X/188>-<0«19^ 

193 LET0"INT(X'19>-"0tie9>*'Ptie)> 

194 LETP=X-((OtI880>*<P*199>+(O>ie>) 

195 LETN=9 

196 IF9=0THENLETN=N*1 

197 !FP.=PTHEHLETN=N+1 

198 IFC=QTHEHL£TN=H-»1 
195 IFD*RTHENLETN=N-M 
299 IFN-4THENG0T0296 

291 PRINTX;*--.N^-CHIFFRE'S> EXflCKS)" 

292 LETE=£+1 

293 IFE=15THENG0T0298 

294 PPIHT-IJN AUTRE NOMBPE" 

295 G0T0199 

296 OUTPL'T-EXflCT BfWO' ,58.29,3 

297 G0T0289 

288 SCREEN35,25,173.25CLS1 CURSOR48.20 PRIHT-PERDU 

C'EST i-;ftiB;C;D 

299 PfiUSES 

219 WIPE.OUTPLrT"VOUS VOULEZ REJOUER ?-, 68, 170,3 

211 0UTF1JT"0<-0Ut n» HON- IN", 69, 138-3 

212 CURS0R119.39 IMPUT2* 

213 IF ZS--N- THENG0T0246 ELSEIFZ»--O"THENCOTOI0 

214 ' Xtttttttttt* 

215 ' *- LOTO =* 

216 ' t t tttttttttt 

217 HIPE.SCREENie9.2l5.59.25.CLSl 

218 OUTPUT ■ LOTO ■ . 110.298,3 

219 LET 2I-INTCPHD<1.49>> 
228 LET Z2"INT<RMD< 1,49» 

221 IFZ10Z2THEN C0T0223 

222 G0T0229 

223 LET Z3=INT<PHCX1,49>> 

224 IF23022flHDZ3021THEM C0TO226 

225 G0T0223 

226 LET Z4=IHT<ftNTX!.49>> 

227 IFZ4< >Z3FiHDZ4( >Z2HHDZ4< >Z I THEIIC0T0229 

228 GOT0226 

229 LETZ5-INT<RND<1,49)> 

238 IFZ3OZ4HN0Z5OZ3flND25< >22PMZ3< >Z1THENC0T0232 

231 G0T0229 

232 LETZ6*INKRt«X1.49>> 

2Ti IF26'>Z5ftNDZ6f>Z4flH02SK -23flNDZ& >Z2f*DZS<>ZlTHE 

f(GriT02?5 

234 G0T0232 

233 LETZ7»lHT<Pt«Kl,49>> 

236 IF27< >Z6mNPZ7' >Z5hNDZ7<' >Z4AMDZ7< >Z3RHDZ7< >Z2RND 
Z7OZ1TTCHG0T0238 

237 G0T0235 

238 SCPEEH25 • 55 . 1 30 . 20 • CLS3 

239 OUTPUTZ 1.39, 99,1 0UTPUTZ2.5e.9e. 1 CKJTPUTZ3.78,9 
9-1 0UTPUTZ4,99,99,1 0UTPUTZ5, 1 18-98. 1 0UTPUT26. 138, 
09. 1 

249 SCPEEH25,75,25.20CLS1 0t'TPl.HZ7,23,7e,3 

241 OUTPUT-TflPEZ IJNE TCtUCHE" .89-23, 1 .W-IMSTRK I > 

242 HIPE -ri.lTPilT-VOUS VCNXEZ PEJOUEP '".60.179,3 

243 O'JTPiJT-CK-0'JI 00 N0H->N"-69. 138.3 

244 CURS0R1I9,38'IHPUTZ» 

245 IF ZS--N" THEHT.|-iTn246 ELSEIFZ»=-ri-THEUGOT019 

246 HTPE'WTPUT"FIM-.M8. 158.2 



Sufle de la page 9 
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12888 PPIHT--^T«JS ff-?EZ >JH H8LUS r-f 399 
8 POIHTS' 
12883 PPINT 
12998 PTS-PTS-3988 IFPTS'0 THEf»-TS=19 



TOTAL ";PTS.-PO 



129^1 PPIMT- 
IHTS- 

12892 G0SJJ82298 COT049 
13889 REM C0MMEHT8IRES 

13819 REM 

13820 W8IT598 TEXTCLS PAPEP7 INM 
13838 Fi'IKTCHR*' 12> 

13933 PPIWTCHR»'4),CHP»'27>.-J 
•• B P fi V ' W 

13949 PRINT PRIHTPRIHT. PRINT 

13843 PRIHT-Vo-/* *v*r reussl * vous P 
mw s*ns " 

138*9 PRIMTCHR»:4> 

13838 Pf>lHT»ncrmbr*,\-*rr*f. d* tur+r 
is« t J<we" 

13860 PRIHT-Vovs will r,«i»,r* &, 1*r* 
rttfjr' 

13879 PPINT"l*s forc-s Mil*-* 1.. i st 
te«d*nt «n- 

13889 PRINT-bord-jre *, 3ys te»e Peuven 
t detMr-q>j*r- 

13883 PPINT PPINT PRINT 

13887 P0I-I88e>N*li4T'3888e/T> 

13888 PT3-PTS+P0I 

13889 PRIMT-YOUS AVE2 UN BONUS D£"iP 
01; "POINTS" 

13999 PRINT PPINT-CE 0<JI VOUS FRIT WJ 
TOTfiL "iPTS.-POINTS" 
13995 OTSUB2298 
13896 G0T049 



13188 Hnnse0*TExT>CtS>PflFCR3'INK4 

13119 PRIHTCHR«<I2> 

13129 PPIHTCHR«<4)jCHR«K27>;"J 
M 6 I C N . . . H' 

13123 PRINTCHR«<4> 

13138 PRINT PPINT. PRINT. PRINT 

13133 PRINT -WLterriss*^ correct vo» 
r>0*«»3 ont »t* s*£CJ«s;4uelt'jrs unt" 

13149 PRINT- sont, ■■•!-- bless*. n*ii 1 
» 9*n*r#t4-jr* 

13145 PPINT-est Pris.c'Mt U Pri-x:ip 
t\...' 

13148 PRINT. PRINT. PRINT 

I3I38 PO>INT<40800^T> 

13133 PTS-PTS+POI 

13169 PPIHT-VO'JS ftVEZ ijm BONUS DE- "iP 
01. "POIHTS" 

13178 PPINT. PPIMT-CE 0<JI VO'JS FfllT AU 

TOTAL -jPTS,"POINTS- 

13189 G0SIJB2299 ■ GOT 048 
13299 miTSeO'GLS'TEXT P8PEP3INK4 
13219 PPINTCHPJK12) 

13229 PRINTCHR«<4),CMP»<27>;"J 
t« 8 F !...»•* 
13238 PRINTCHR»Y4> 
13233 PRINT PPIHT PPt NT PRINT 
13249 PPIHT- II ■, # a> I. eiiMi VO'JS 
P<rd«i l« - 
13243 PPIHT-iBOlti* d* vos ho-«*s * 1' 

"toltle * 1* Prj»» 

, i 'ob Itctif nt it 



13259 RPINT-l'j.j 

*j 9#ne-" 

13255 PPINT"-rjt. 



t^li 



*l3 



13269 PRINT" t 4u*l Print..." 

13270 PRINT PRINT PPINT 
13289 P0I-1989*N 
13285 PTS-PTS+POI 

13287 PPINT-VOUS A-/EZ "JN PETIT 80MJS 
DCt-,P0i,-pT8- 

13288 PRINT .PRINT" TOTAL ■ *; 
PTS, "POINTS" 



13299 GOS"je2288 GOT 049 

13388 HAIT588.CLS.TEXT.pAPERl.IHK4 
13310 PPIHTCMR*:i2> 
13314 PRIHTCHP«<4);CHR»:27>;"J 

13313 PRIHTCHRtM) 

13317 PPINT. PRINT'PRINT.PRIHT 

13328 PRIHT"P*s terrible; vo-js Perdez 

le v*lis*«u" 

13339 PRINT"* l'#tterrlss*9e, vo-is P* 

rdn vos ■ 

13340 PRINT-hcmes et en P1 U5 vous »P 
Pelez *<1 " 

13346 PRINT-seco'jrs.Je doute tv'on vi 

13359 PRINT-chercher -surto-jt 4u» U 

13360 'pRINT-reiiste to-j iowrs.. . - 

13370 PRINT PRINT 'PRINT-VOUS MRRO-JEZ 
A"J TOTfiL'-iPTSi-POIHTS" 

13388 GOSUB2208 G0T049 

13488 WRIT388. TEXT. CLS. PAPER9INK1 

13410 PRINTCHR«<12> 

13428 PRINTCHR»<4> ) CHR»<2?>;"J ■■ 
CATRSTROPHIQIJEl' 1 ••" 

13438 PLOT0,1.6.PLOT0-2,6.PRIHTCHP»<4 



13460 PRINT -PRIHT-Mfis <*eP-!is lor.9te« 
Pi <!"■<■. 1* -*«l«'ie" 
13478 PRIHT-on * p*s vu vn cow«»ryJ#r.t 
de bord UlHl nln»bl«..." 

13480 PPINT PRINT PRIHT 
13498 Hfl-!008*H 

13492 PTS-PTS-MA IFPTS<9THENPTS- 1998 

13493 PLOT0,13,6.PLOT9,17,6.PLCT9.22. 
29 PL0T8.4.29 

13494 PPIHT"V0<JS AVEZ UN MRL'JS DE • " 
.Mfl, "POINTS". PRINT 

13493 PRINT" TOTAL. -.PTSi"PO 



INTS- 
13498 GOSUB2288 -GOTO40 
13888 REM VfUSSERU 

13010 REM 

15828 X-188 

13938 CURSETX.Y.3 DRRH28.-2. 1 DR8U-3, 
3 . 1 'DR8M-13. -3. 1 . DRAN-I3, 3, 1 

13949 DRnH13,3,l.DR8W13.-3,l 

13838 CURSETX,Y*3,3'CIRCLE2.1.CURSETX 
-4.Y+3.I CIRCLE1.1CURSETX*3,Y*3.I 

15960 CIRCLE1.1 

13878 RETURN 

13100 CURSETX.Y.3 DRAH29. -2.9DRflM-3. 
5,0 DRAU-13,-3,9DR8W-13.3.0 

15119 DRAHI5.3,8'DRfiHI3,-3,0 

15128 CiJRSETX,Y+3,3CIRCLE2,eCUPSETX 
-4.Y»3,3CIRCLE1,8'CURSETX+3,Y*3,3 

13139 CIRCLE1.8 

13148 RETURN 

16090 REM SOLEIL 

16010 REM 

16109 F0RI-1T023 

16119 POKE47969+48*I.3POKE47860+49SI 

2 

16129 NEXTI 

16138 LE-INKT/10) 

I6I40 FORI-IHT'HI >*lTOLE*INTrNI> 

16159 CURSET130, 172.3 CIRCLE I.I 

16169 NEXTI 

16178 HI-HI*. 801 

16188 RETURN 

39809 REM FIN 

30919 REM 

39929 CLS P8PER1 ' INK9 

79939 PLOT! . 12. 18 PL0T13. 12, "A BIENT 
OT. . . " 



MAISON NOIRE 



Le 27 juillet. un num6ro 
quadruple pour le prlx de 3 
numeros. 4 programmes 
par ordlnateur, 64 pages! 
24 francs chez votre mar- 
chartd de journaux. 



Le theme de ce jeu est pour le moins amoral: vous 
devrez cambrioler le plus possible d'appartements 
dans un immeuble. Prudence, neanmoins, la police 
veillel 

Jacques REDURON 

Le joueur se deplace dans la maison. suivant les 4 directions avec 
sa manette et eclaire la piece ou il se trouve en appuyant sur le 
bouton de la manette. Sur I'ecran, s'affiche le plan de la maison vue 
de dessus. Les 60 carres noirs sont les 60 pieces a visiter. II y a 4 
portes d entree. 



Le voleur sait que ; 

Les maisons sont vkles mais un garde invisible a lecran tourne au- 

tour. 

II taut irouver d'abord une cle puis un coffre. 

Les couleurs des pieces sont disposees de facon aleatoire saut 

pour les 8 pieces composant un carre aulour de la piece "de"- Les 8 

+ 1 pieces forment un groupe dune couleur. Meme chose pour le 

groupe de piece "coffre". 

Chaque deplacement coiite 500 points e! I'on peul faire 25 deplace- 

ments avant que la police n' arrive. 

Si, en appuyant sur le bouton de la manette, on eclaire la piece ou 

Ton se trouve. on voit la couleur de celle-ci et le micro previeni que 

I'on a trouve la cle et/ou le coffre. 

Mais, si on allume. surtout dans les pieces periphenques. on aug- 



ments le risque d'etre vu par le garde at de voir la poaee arriver S 

tours plus tard 

Si le voteur trouve la de. puis le coffre il est credtte de 25000 points 

multiplies par le numero de la maison ou I se trouve. a condtton 

den ressortir, 

Des que le coftre est ouvert. I alarm* r at er it et la potce amve par 

lune des 4 entrees 

La poursuite sarrete des que la police rejoin! le voleur ou des que 

le voleur arrive a sortir de la maison. Alors. lecran s efface et apoa- 

raft une nouvei'e mareon a cambnoter. 

Au bout de la 10* maison. le deptacement de la police est double 

car il taut bien que I 'equtpee du voleur se tenrwne a f m que la m or a K ) 

sort sauve! Mais on peut encore sen sort*. 

On trouve dans ce jeu. I occasion rJexercer sa memowe pour retenir 

la couleur des pieces deja vrsnees, son esprit de deduction car a 

partir d'intormauons fragmentarres il laut essayer de deduire rendroil 

possible de la de et du coffre. un pebt peu de strateo>e. pour trou- 

ver le type de deplacement pouvant apporter le maximum de renset- 

gnements pour te minimum de nsques. 



4 CLS:SCPEEN7,0,0:GOSUB12eO0 
10 CLSiPP0-3 

12 MM KOI, 7) 

13 N>M*t:'.. DEPLACEMENT PO DOUBLE LltNE 
336 , 
I" HASP0MNT' PHt'44-1 .: IF HASPG*! THEN P0 
X«|7:P0Y»l:£LSE IT HASP0-2 THEN P0X*3:P0 
y*10:ELSE IF HASP0-3 THEH prjx*35 : POi - 1 8: 
ELSE P0XM7:P0Y»2£ 

3e for x-o to 9 

49 FOR V-0 TO 5 

38 m-int<rnc>»7>»i 

70 ■80XF<.y»2«.4e.Y«4»£4>-(X<24»56.Y»24* 
4e).K(X,Y> 

38 NEXT: NEXT 

9e • COFFRE... 

180 B-JNTiRND»$>*2 

no :-h t ss;.n... 

115 Bl-<<<B-l>M4>*40>."8:Cl»t<<C-l>»24>* 



VX>32 THEN VX-32 
345 LOCATE VXl,VYt!C0LORe:PRIKT-V-; 
350 LOCATE VX,VY,0:C0L0R65PR1NT*V; 
335 VXl-VXiVYl-VY 

356 IF N>*10 AND ST< >0 AND P0; = L THEN GO 
SU82200 

357 IF ST".;8 AND C0FF = >1 THENC0SUB3e3tf : G 
OSUB230e:- " 



I' 



Oil' 



i le 



120 * LOCATEB1.C1.0: 

125 A«IKT<PND»7..1 

138 FOP. X"B~2 TO B 

148 FOP Y-C-2 TO C 

158 I 



•?*•>* 



/•24*56,V»2 



B0XF<X»24*40.' 
4*40.,K(X,Y> 
170 NEXTiNEXT 

180 ' CLE 

198 *>1MT(RND<7>*I 

208 BC»INT<:ftMD»8>*2:Dl»ABS(BC-B> 

210 CC-IMTtRPID»4j*2:Dn«AeSi:CC-C>:iF t>I > 

«3 OR Dll-3 THEN21S ELSE 208 

215 BS»«<BC-l>«24>+4e>/8:C2-<UCC-l :'«24 

>*32<'8 

£28 •L0CATEB2.C2:PRIHT-C- 

238 A«IMT'PNC»7.»1 

240 FOR X-BC-2 TO BC 

258 FOP Y-CC-2 TO CC 

260 K<X,Y»A 

270 'B0XF<xa24*48,Y»24*24>-<X«24*5fc.i'»24 

*40>,K<X.Y> 

230 NEXTYSNEXT XiCLS 

281 ' &E PLACEMENT VOLEUR... 

285 GO5UB100O 

290 VX-l7:VY-22 

300 ST»STICKU> 

305 IF 5Tw0 THEN NBDEP'N80£P*1 : SC0*SC0- 

500:GOSU83589: JF NBDEP=25 THEN P0»1 

310 JF ST*7 THEN VX*VX-3:IF VX'5 AND VY= 

1* THEN V:<.3:S0PTIE"7ir;0TO9e8e:ELSE IF V 

320 IF 3T-5 THEN VY-VY-3MF VY>19 AND VX 
*17 THEN VY^22:3DRT:£ = 5iCOTO=-A00 ! Eu;E IF 

VY>19 THEN VY»I9 
330 IF 3T=1 THEN VY=VY-3: IF VY<4 AND VX= 
17 THEN VY=l:30RTIE=i:COT09e08:ELSE IF V 
Y'4 THEN VY-4 

340 IF ST»3 THEN VX*V»3:IF VX/32 AN& VY 
= 18 THEN V/ = 35:30PT:E=3:GOT0;-eee:EL$E IF 



358 IF SToe AN& P0>-1 THEN G0SUB228e 

359 'Le j«u tst beaucouo plus rjpide ;i 
d»f.s Us li9«es 357 et 353 on suppri*e 1 
4 condition ST<>8 

368 ST1=0:STI = STRICM> 

378 IF ST1 — 1 THEN 375 ELSE 410 

375 PIX=CINT<VX-'3>>-l:PIY=<INTCVY^3>J-I 

388 B0XF(VXte, (VV-1>«8>-(<VX*1)«8.(VY»I> 

•8>.r<INTfVX^3'<-I, INT(VY/3)-l> 

382 IF ST108 THEN C0SU83888 

385 C0SUB2088 

39^ ST1=8:ST1=STRIG<1>:IF ST1=-1 THEN375 

ELSE 488 
488 80XF<VXtB. (VY-I l«S>-'-:VX»l >t8,(VY*l> 

418*GOT0300 

leee * dessin mur.s... 

1303 ATTRBl.e:L0CATE:5,3:PRINTN;-e »aiso 

n';:ATTRB8,8 

1005 B0X<4,2>-<34,2B>CHRIfl275,3 

1818 FOR X'O TO 9 

1828 FOR Y-8 TO 5 

1838 80X(X«3*4,Y«3*£>-<X»3*7,Y»3*5-'CHP»< 

I27>,3 

1848 NEXT :NEXT 

1858 L0CATE16.21 iPRINTCHRK 1 £7 1 : LOCATE 19 

,2l:PRINTCHRSC127> 

1852 L0CATE3.S:PRtNTCHP^' I £7- : LOCATES. 11 

:PRIHTCHR*(127> 

1854 L0CATE35,8:PRINTCHRt'. 1 27 > :L0CATE35, 

ll:PRINTCHRS(127> 

1856 L0CATE16, l:PPINTCHRf f 127>:L0CATE19. 

l:PRINTCHRf(127> 

1068 RETURN 

£088 * GARDE 

2804 IF PIX-8 OR PIX*9 OP PIY*0 OR PIY=5 

THEN GARD=INT'PND«4. 
2885 IF PIX-1 OR PIX=8 OR PIY*l OR PIY»4 

THEN GARD1'INT<RND»10> 
2006 If PIX«2 OP PIX=7 THEN CARD£-=INT(RN 
0*28) 
2818 IF GAPE-2 THEN PO-PO-1 :PLAY"L18D0DO 

£012 IF &ARD1=4 THEN P0=PO*l : PLAY'L18D00 

o- 

2814 IF GARD2-8 THEN PO^PO* 1 :PLAY"L 1 8D0D 

0- 

2828 IF P0>«1 THEN G0SUB22B8 

2090 RETURN 

2280 ' POLICE. TAP... 

£210 TAP"TAP*i:'TAP = Te»»>s ■S'arrivee »»oli 



' 2228 IF TAP=5 THEN LOCATEPOX, POY: PB I N 

2238 IF TAP>5 THEN G0SU8238O 
£298 RETURN 

2388 ' DEPLACEMENT POLICE... 

2318 DISTX=ABS<POX-VX) 

2328 DISTY=ABSiPOY-VY> 

2325 POX1=POX:POY1=POY 

2338 IF VX>-P0X AND VY>«P0Y ANf DISTX^D 

ISTV THEN POXiP0X*PPO 

2348 IF VX>=P0X AND VY)=P0Y AND DISTX'DI 

STY THEN POY=P0Y*DPO 

£350 IF VX>=P0X AND VY(P0Y AND DISTX'«DI 

STV THEN P0X*P0X*DP0 

2368 IF VX>-P0X AND VYtPOY AND D1STX<DIS 

TY THEN P0Y-POY-DP0 

2378 IF VX^POX AND VY>=P0Y AND DISTX^DI 

STY THEN P0X=P0X-DP0 

2375 IF VX<P0X AND VY>=P0( AND DISTX<DIS 

TY THEN P0Y-POY*DP0 

£388 IF VX<P0X AND VY<P0Y AND DISTX>«DIS 

TY THEN POX-POX-DPO 

2398 IF VX<P0X AND VY<P0Y AND DISTX<DIST 

Y THEN POY=P0Y-DPO 

2408 LOCATE P0X1 , POV ! . 8: COLORS: PRINT *P" 

2418 LOCATE POX, POY. 0= COLORS: PRINT •?■ 

2428 DISTX-A8S<P0X-VX> 

2438 DISTY-ABS<POY-VY> 

2448 IF D1STX-8 AW DISTr=8 THEN 8080 

2499 RETURN 

3808 ' TEST SUR CLE ET COFFRE... 

3818 IF VX*82 AND VY=C£ THEN LOCATES. 22= 

C0L0R6:PRINT'VQUS TROUVEZ LA CLE..CHERCH 

E2 LE C0FFRE'*::CLE=l:C0SUB188ee 

3020 IF VX«B1 AND VY«C1 THEN L0CATE8,22: 

C0L0R6:PRINT*V0US VOYET LE C0FFR£''::IF 

CLE=I THEN L0CATE23.22:PRINT"ET VOUS L'O 

UVREZ-'JiCOFF^irGOSUBl 8000: ELSE L0CATE23 

.22:PRIMT*MAIS ET LA CLE7- ; : G0SUB1 8888 

3830 IF C0FF*1 THEN PLAY'L 10A 104SI02DO* 

3090 RETURN 

8088 ' .. .PERDU. .. 

80! 8 LOCATE8,22:ATTP8I,0:COlOR3:PPINT-PE 

RDU i i ! -:END 

3598 l6caTE8,0:ATTPB1.8:COLOR2:PPINTSCOJ 

3688 ATTRB8,8:RETURN 

9888 * . . .SORTIE. .. 

9818 IF SORTIE'l AND COFF'M THEN LOCATE 

17,4:COLORO:PR1NT-V:GOTO?588 

9812 IF SORTIE-3 AND C0FF=>1 THEN LOCATE 

32, 18: C0LOR8: PRINT" V!G0T09508 

9014 IF S0RTIE-5 AND COFF-M THEN LOCATE 

17, 1 9: COLORS: PRI NT- v : COTO9508 

9016 IF S0RTIE»7 AND COFF-M THEN LOCATE 

5. 10:COLORO:PRINT-V:GOTO9588 

9020 IF S0RTIE-1 AND COFF-8 THEN L0CATE1 

7.4:COLOR8:PRINT-V:GOT09380 

9022 IF SORTIE-3 AND COFF-8 THEN L0CATE3 

2, I0:COLOR0:PRINT-V-:GOTO93ee 



TO 1 




9024 IF S0RTIE«5 AND COFf-0 THEN LOCATE] 

7,19iCOLOR8iPRINT-v:GOT09>3»0 

9826 IF SORTIE-7 AND COFF-0 t M £k ^::~-Z'. 

,10:COLORO:PRINT-V:COTO93OO 

9308 ATTRB1,8JL0CATE8.22:C0L0R5:RRINT-|>E 

RDU,MAIS SAUVE' •:ATTR60,8:COTO»6ad 

9508 ATTRB1. 0i LOCATE*. 22:COL0P5! PRINT "BR 

AVO'-:ATTRB8,8ISCO"SCO*23O004N 

9688 ' . . -R A Z*ro 

9605 cosuoteaee 

9610 PO-ftl 6I«B>S I CftRM««l CeRPgwOi P 1 SI '■:• 

:DISTY-0:TAP«0 

9620 NBDEP-O!CLE-0:COFF.O 

9630 SORT1E"8:ST-0:;T1'0:P1:.-8:PIY»0 

9640 CLS:ATTRB1, |tL0CATC« F l9iRRlNT-<#ftCt 
LA -:n;-« •aiion-;:L0CAT£e,15JPRlNTSC0: 
ATTRBO.O 
9650 GOTO 15 
18080 '... 

leeie fort- uoseo: next 

18020 L0CATE8,2£iPRINT- 



10030 


RETURN 
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PR1NT-B 
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1PPIN 






int»-:PRINT-«n o 
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12018 


LOCATE0 


I 1 


>PINT" 












5 PINT-»ai» Us rinuti t 




PPINT'Un 




vat 1 la 
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LOCATES 


14 


PRINT 


Chaau. 
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12030 


LOCATE0 


Ifl 


PRINT 
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12040 PI«lN^Er*:L0it'TE0.23:PPINT-FPAPPEP 
UNE TOUCHE POUP COWHENCEP- I X'PND: 1 F B I- 
"THEN 12040 

12038 RETURN 



CASSE-BRIQUES 



Ce jeu consiste a eltminer 4 rangees de 15 briques 
chacune a t'aide de 2 raquettes superposees et de 1 
cxi 2 balles. 

Chaque partie comporte 4 manches. Les trois premie- 
res se font avec une seule balle qui se deplacera a 
une vitesse lente, moyenne et rapide respectivement 
pour chacune des manches. 

Pour la quatrieme manche, vous aurez 2 balles (ce qui 
ne facilite pas les choses!) qui se deplaceront simulta- 
nement et, heureusement, a vitesse lente. 
Le deplacement des raquettes est obtenu a I'aide des 
touches *~ et — * . 

Si une balle tombe au sol, c'est ('elimination! Et en ac- 
tionnant BREAK et CLEAR la partie peut etre annulee. 
Ce jeu est sonorise. 

Jean Marc FRATARD 



Conseils pour la programmation: 

L'essentiel du programme est realise en langage machine, il y a 

done lieu de recopier correctement tous les datas. y compris lous 

les places en (in de ligne. 

Avant de (aire toumer le jeu. assurez-vous que vous en avez une 

copie valaWe. 

Lorsque le programme fonctionne. il est entierement independant du 

Basic et. de ce fait, s'il y a une erreur de programmation: le jeu peut 

sort se bloquer, sort s auto-detruire (en cas de blocage. le bouton 

RESET, situe a larriere gauche de la console peut debloquer, even- 

tuellement le programme). 

Dans les deux cas, il faudra verifier le programme, corriger le ou les 

erreurs et sauvegarder celui-ci avant de le faire toumer a nouveau. 



L'ALU (/'Association Loisirs Urbains) ouvre une nou- 

velle base de plein air et de loisirs a Saint Ouentin en 

Yvelines : Le Pare Etang. 

Outre six cent hectares d'espace fibre et de detente, 

vous pourrez bientdt y trouver un espace Micro In- 

formatique 6quipS essentiellement de micro-ordina- 

teurs M05, prStes par i'ADI, /'Association pour le 

D6veloppement de I'lnformatique. 

Pare Etang St Quentin en Yvelines: Tel - (3) 051 53 

15. 



TBS 80 
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numOros. 4 programme* 
par ordlnateur, 64 pages! 
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60 • "" 

90 a3 POKE I fi« 1-39 POTE153«2,117 CUftR3008 

108 PPIHTB2e,STRIMC*'2i.42) WO- *CAS3£ -BRIGS' .&I4A, STRING*-; £! ,42 > K36. " 

:ie SMyssew print prjmt-- la pbrtie peut etre p*»*jlee eh tapamt 'gpeak et clea 

R'.- PRIMT PPIMT-- VEUILLEZ BRWOCR LE 80H S.V.P. ET PfiTJEHTEZ * 

IIS F0PI.29J9!Tr/31458 PEflON P0KE-I,fl MEXTI 

130 PC* , £16526,39 P0KE165£7.i;7 eNJSKB) 

:C8 QOTOia 

49?2 ' :t.[Trp_: 

^eee ifiTP24;,;75.53.22.:2;-237,95. 50.22, 123 

»K PPESEhTATlOH 

S818 DflTMS, 30. 117,205. IOC. 119.52. 48, 21 1,2^;, 3:. 194. 121, 17,6fl, 61, 203-220, 120-1?. 

f2.CZ, 235. 220. 128. 17, 132,«, 285-220, 120,33. 92. 122. 17. 5,«, 285. 228, 120. £85,43. 0.2 

54.13,32,249 

5012 'CCTj/T Vj X.-j 

Mi; C*>TA62 3. 21 1-235, 50. 19 :23. 50. 21. 123. 62- 1,30. 16. 123.50. 0. 123.62-5.50, 3. 123, 

62-18,38.1.123.62. 10. 50. 2. 123. 52, 60. 38.10 12 J.«.t2.58, 7, 123, 60,50. 9. 123.62.220- 

50.6- 123. 50,8- 123.8.0.8.8,8,0,0 

3016 'CEMEPATION DE Lft BflXE 

5028 DATA58, 16. 123. 71. ;-?.:•:«. ?3 -Wi.K-2 .LZ.Ln. 14. 121. 196.22. 233. 1 19.0. 62-6,2«5, 1 

4,i2!.jw.:e 

3022 JflTAE^. 119, [,62. 2. 283. 14, 121. 133. 214. 3. 233. 1 19. 2. 62- 2, 283- 14, 121, 133,214, 3 
,233,119.3.17.4,3,253.25.16.287.233.54.8,0,285.106.119.203,126.119.221,33.134.12 
1,0.0,0 

3023 'BOUCLE PPIMCIPHLE 

3*30 DATR3A. £4, 36 254?, »2 r 43,:l7. 221.1IB.8.221, 182. 1. 14. 1. 243, 237. 91. 0-123.205 

,36- 119. 241, 243.237.?!, 6. 123.203. 36. 113. 241. 283, 1 11, 32.14,20J.119, 40, 18. 123.230, 

63,254.54.40,11,19.24,9.123.230,63,234,2,40.1.27,237,83.6.123 

3032 DATR243. 14. 0,203, 36, 119,241, 28, 237.??. 8. 123. 243, 14.8.203.36. 113.241,38.3.12 

3, 234. 0,40. 7. Ci. 30. 3-123- 195.232. 117.38,1. 123,71, 14. •,206.96. 0,62,2.30- 3, 123,0.0 

303$ 'HVBHCE OflLLE 



3038 0flTA233-33.3O.l23, 173.30, 11. 123,233. 126-8- 103.202.243. MB. 93. 233.86, 1.243.2 

03.74, 121,241,233, 134,2,234, 1,40. 4, 23*, 62. 32, 14.233. 126,2.237,66.30.11. 123,233, 1 

13.2.233. 125.0,233-119.0.95.233. 126.1.233.134.3.234.3,40.7.234,47,32, 17. 193.130. 

120 

5040 DATA233. 126. 3. 237. 68,30. 11. 123, 233. 1 13. 3.233, 126^1, 233. 119. 1.87,203.84, 121. 

40.36.33,30. 123. 126. 35. 183. 202,213. 118.167,32, 16. 126, 186. 32. 12. 233. 229. 193. 3. 120 

.180. 32.32. 121, 189, ?2. 23, 33, 35, 35. 24, 226, 122. 234, 33. 40, 7,234, 43.40, 3 

3042 DflTO205. 20, 128,233. 126, 3, 237. 68, 50, 11, 123,233, 119, 3, 203, 64, 121, 17. 4, 0.233. 2 

3. 194, 97, 118, 58, 11. 123. !?3, 40, 18. 62.1.14. 34. 71 1,233. 6, 120, 16. 234. 238, 3. 13. 32- 243 

.193.232,117,30,2. 123.71. 14, 0.203,X. 8-193. 232/1 17. 0,0-0.0.0, 8.0 

5055 'AFFICHACE PAR 8IT 

3060 0flTA229. 213, 213. 126.35.103,40.43,234,1,48.32,203-73.32,10.203.63.32.13.71.2 

6-176.18.24,13.71-26,160,230,127,43,0,24,10,238.63,71,26.168,18.19.24.213.227.17 

. 64.0. 25. 233225, 24. 203. 289. 209.223.281. 0.8, 0,0.0. 0-0, 00 0.3. 0-8 

5065 'EFFACETtHT DC L'ECWH 

3070 DATA33.3, 63, 17. 1,60, 34, 128, 1,253, 3. 237, [76, 201, 8. 8. 0.0.0.8 

5073 'DCSS1N INITIAL 

5080 DATB33, 66, 60.6. 68, 34, 131, 33, 16.231- 0.0. 00. 0,0. 0.0. 0.0,6. 13. 33. 63.60. 17. 64, 

0,34.191,23,16.231,33.126,60,6.13.34.191,23.16.231.6.60.33.130.60.34.191,33.16.2 

31.6.60,33.194,60.34,191,33,16.231.6.60.33.2.61 

3002 DflTA54. 191, 33, 16. 231 .6. 60. 33. 66. 61. 34, 191, 33. 16.231. 6- 0, 33, 220. 62. 54. 131. 33 

.16.231.6.0.33,220,63.34,131,33, 16.231,33.30. 122, 17. 2, 68, 203, 230. 120. 17, 36. 60. 38 

,20,123,203.240,120, 17, 12,60. 50. 2!. 123- 203, 240. 120, 201. 0,0, a. 0.0. 0.0. 00 

5083 'BRIOiJC TCXHEE 

5064 DflTAO,8.8.e.e.8.0.e.e.O.229.2O5.94.!2l, 123.214,1-214,4,40,232. 198.4.234,1,4 

0.18.234,2.32,3.43,24. 11.234,3-32-4,43.43.24.3,43,43.43.6,4.34, 128,33.16.231 

5003 DATA6. 60. 38. 21- 123- 60, 30. 21. 123, 30. 19. 123-60.30. 13. 123. 184, 32. 23, 203. 120. 12 

2. 203. 100. 121 .62. 0.33. 19. 123. 62. 60. 50. 10. 123. 1.0. 15.203. 96. 0.195. 129. 1 17, 50. 21.1 

23.17. 12.60.205.240, 120. 223. 201. 0,8. 0.0.0. 0,0. B. a,3. 00. 0,0. 0.0. 0.0,0.0.0. 3. 0.0. 

3006 DATA6,20;i97.33,«4,6O,i.!92.3.|26.238.63.1!9.33.1l.l2O,177,32246.62.1.14,7 
1.211. 253. 63. 16, 234. 238. 3. 13. 32, 246. 193. 16. 222. 205, 180- 121. 193. 49. 117. 0,0.8. 0.8. 
0.0.8.0.0.0. 0.0. 0,0, 0.0.0,0.0,0.0.8.0. 0.0- 0.0 

13 
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MONSTER PANIC 



Vous ferez-vous piquer par laraignee geante. devorer 

par le crocodile, ecraser par un boulet ou tuer par le 

squelelte? 

Jouez et essayez de battre mon meilleur score: 23814! 

Mode demploi inclus dans le programme. 

Francois JOUAUD 




L» 27 fufflat, un numaro 
quadruple pour la prli d+ 3 
numarot. 4 proyafnrrfi 
par ofdln*l*ur. M p«9»«' 
24 fr»r>ct ehaz vertra mar- 
crtand d# K>urn»ui 



SPECTRUM 




3 ClS ' 'g OROEP' ?' * I NK 1 PRIN 

\MDN5TEF 



aa let 
























«' iou» 


«» P 


























•ri 












- ■ j 


-.11 










1 Cf 


>COd> 


■ 


















< ll'-l.!".! 




31 LET 


il'U- -■" 
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33 FOR 


'■1 TO \-tf- 




if >. ;f 






THEN 


BEEP 


















INT 








3. Uti HI 


«I 5-7-8 * 


t POV 


I 



USE 500 BORDER 



100 restore 

L10 READ .1 
a POKE USB 



,oa pop i-'t to ao 

FOP l.»TO 7 REAO 
!»♦(,»: NEXT I HEX 



Ill DATA 
Hi OATA 



il3 OPTS 

a, 25*, 33*,; 

128 DATA 

7, 2*7-, 2*7 

130 DATA ■ 

1*0 OATA 
127,233 

ISO DATR 
.253, 159 

168 DATA 
5,349 



k ' .1,7,1,7,8,16,32,22 

"•", 1, 1, 1,7,233,249, 1, 

'", 8. 192, a. 192,32, 16, 

J ' , 192 , 240 , 2*8 , 232 . 25 

S3 

■» ' .0 , 127, 127, 127, a, 24 

1 " ,e,a,*,8,5«,32,ae,a 

I ° ,3,13,31,63.63, 127, 
\ " . 15 . 3 1 . 32 , 32 , 34 , 240 
J '.240. 246. 4,4. 2, 7, 23 
28*. 240, 25 
240,233.159,64.32. 



tee data 
32.31.15 
190 DATR '/" ,7.253,249 .2,4.4,24 

«.2«a 

230 DATA "*•' ,0,3,7,18,13,13,14, 

3 

210 DATA ',■ .8. 192,224,2*8, 178, 
240, 112, 1M 

220 DSTa "-, " ,3, 31,63, 119. 183. 10 
3.99.243 

230 DATA ■■*»", 192, 2*6, 232, 238, 23 
0,230,193,207 

£40 OATA "?",99,7S.6.6,5,14,78, 



S3 

230 DRTA > 
12,50.36 

260 DATA ' n 
24,2* 

27a DATA p 



.196.202.96.96,96, 1 
.16, 40, 72, *6, 16, 16, 

.0.7,165. 103.226, 19 
.0, 192.64 , 192. 136, 1 



£nk i, AT "it,'™ 
460 POINT INK_l7'«»> 

IV. ink a, - *b7",~nk 2,- 
nk i,or i6.3i,%" 

4.70 PPINT INK I. " m 

iNr 0. ■ mm' 1 . INK 2. " 

NK l.ftT 17,31,^L'- 

*ae print ihkT 

, •-. lux. «, -W 



500 



00 PO INT AT 20.26. INK 

K 5. "■■■I". Ink i. w 
10 ppTnT TAB 27, inf 1, 



,„ TO 20 
23, INK 3. U NEX' 
21.23, INK~, | I 
535 PRINT BT 7.5, 
8.3, BRIGHT 8. INK 
3. VV 
537 POINT BT 4,23. 



PRINT AT 

3. *., . BT 

■^V'.P-T 9, 



DRTA 71,79.103,31,0,0,0,1 

6*0 RESTORE 6*0 FOP I -0 - 

REBD a POKE U3R •'*•"* f , a I 

DRTR 208,22*. 194,530,39, «,«.,» 
650 RESTORE 630 FOR f -8 TO 7: 
READ • POKE USA "/" + ',* NEXT I 
DATR 0,0,0,0,3,4,8,21 
660 RESTORE 660 FOR f -0 TO 7 
REBO < POKE USR "* " ♦ f , a NEXT f 
DATA 0,0,0,0,192,32.16,168 
67B RESTORE 670 FOR F -0 TO 7; 
BEAD 4 POKE USB ■^■' ♦ f ,* l NEXT f 
DATA 34, 36, 36, 34, 25. 8,*, 3 
680 RESTORE 680 FOR f .0 TO 7 
BEAD a POKE U3R "»*"*f,*. NEXT / 
: DRTB fiJ3.36.36.68, 163, 16,32, 192 

690 RESTORE 690 FOR f -0 TO 7 
REBO a POKE U5R "»"♦',»: NEXT f 
DATA 96,89,23,3,44, li2 
700 RESTORE 700. FOR 1-0 TO 7 

■■■■ -', ■, ■-.-•: ,-.;■- n - 1 , ^ ■;■-.- . 

DATA 0,0,0.233,253,235,63,193 

710 RESTORE 710: FOR f -0 TO 7 

READ a POKE U3R "»" ♦ f , a NEXT f 

DATA 0,0,0. 192,25* ,253,3, 126 

720 RESTORE 720 FOR ' »4 TO 7: 

READ a: POKE U5R "JP" ♦ f , a . NEXT I 

OBTB 8.13,122,32.1*7,116,72,13 

A 

730 RESTORE 730: FOR 1-0 TO 7 

READ • POKE USR " j" * f , a : NEXT ' 

DATA «a,*2. 170, 190,252.60,58 

740 RESTORE 7*0 FOP J »0 TO 7 

READ i POKE U5R ■'r,'-«f,a NEXT I 

OBTA 55,56,36,56,57,6.1,63,15 

730 RESTORE 750 FOP I *9 TO 7 

READ » POKE USR "''■.(,* NEXT I 

DATR 56,56,36,56,184.246.243,2 



ET 



35 GO TO 800 
70 GO SOB 1000* ibOU*lO0p 
76 IF buu*13 TME'I LET bOu *9 L 
'- I IF ton .2 THEN LET 



.:. 1 



30 THEN LET bOu«l. L 




777 LET bO 
776 IF bOU 
ET '.gn.0 
730 BETIJRN 
800 LET 6.-3 
810 LET bOU"l 
820 LET i.lri.0 
830 LET f.J 
333 LET 4-23 
340 LET " ' 
' — LET _. 

PAINT B0, PAPER 
aai i Kin" score ",ht 
670 LET a>20 
380 let aaaa>0 LET **>0 let 

• ■0 

399 REM 



902 LET aitaoaa let *•>.!* l 
Et aa>b 

903 IF b»0 ANO ' )3 THEN CO S'J8 
>000 

903 PPINT AT 0,0, CAPER 1. INK 
, SCORE" ni«»«» vivinti 

" . ■ . . BT 0, 7. if. 
910 GO 3U6 770 
913 PRINT AT 20. b-i 



■ , AT 21 
••.AT 2 



920 PRINT INK 0, AT 20.1 

925 GO 5US 1000* i I .10' 

930 LET tib-12 RNO INKEY«« 8 mm 

933 IF o.-Si THEN LE^ h»f 00 T 

7000 
935 LET b-b*bb 
940 IF b-a«aa and o ■ 1* AND b'19 

THEM 00 TO 5501 

999 NEXT I LET t '-■> ::•■'.• 1 > -i 
NtXT « 
1900 PE" I 



1020 PRINT BT 28.27, II 
. BT 19,23, PAP' !■ 

PPPEP 7 GO SUB 1068 
1023 RETijRN 

-- ^^^ PAPCP*'7T"i"'""G0"su6 
1080 RETURN 
3*0 PRINT AT 16,23, PAPER 3, IN 

2.-K paper y. ■•»" go sua la 

RETURN 

PRINT AT 18.23, INK 3,"U " 
19,24, INK 0, PAPER 5, ">*m" 
SUB 1080 RETURN 
.__ PRINT AT 19,26, INK S.'ffM" 
RT 20,27, INK 0, PAPER 8, S*» 
'10 SUB 1390 RETURN 
1070 PRINT AT 20,37, INC, 0, CAPE 
R 5, "5W ,r GO SUB 108* RETURN 
1060 PRINT INK 2.BT 19.*,'«",«T 

RETURN 
1090 PRINT RT 16.*,' .AT 18,13, 

" ",«T 19.8," ".RT 19,10," " , fi 



T 20,7; INK 2, | 

1093 PRINT AT 19 
19.9, ' I' 

1096 IF b>6 hi,;, 
3701 

1097 BEEP .01 

1098 RETU] 

1099 REM ' 



539 _- 

540 RESTORE 341 

341 FOR 1*2 TO 7 READ a POKE 
USR m r*t,t NEXT I DRTR 11,7,3 
.2,2.4,4.1*, 8 

3*2 RESTORE 542 FOR (•« TO 7 
READ a POKE USR "V ' . f , a NEXT I 
OATA 200.196.192,64.32,16,16,2 

3*3 RESTORE 530 

330 FOR f 1.0 TO 7 READ a POKE 
USR "I"* (.a; NEXT f: DATA 1,3,7, 

551 RESTORE 560 

533 IF ((.«.; ThEn RESTORE 3567 
360 FOR '*0 TO 7 BEAD * POKE 
USP i *f, a NEXT f DATA 123,19 
2,6* .124,192.123. 192,240 

590 RESTORE 590 FOR f *0 TO 7 
READ a POKE USR " J " ♦ I , a NEXT I 
DATA 1,3,2,7,3,33,19.15 
600 RESTORE 600 FOR I •» TO 7 
REBD » POKE USA "I "♦f.a fJEXT I 
DATA 128. 192,22* .224,224, 128, 1 
92,22* 

610 RESTORE 610 FOR ! »0 TO 7 
READ a POKE USR " 7" ♦ I , a : NEXT I 
DATA 3,3, 3, 2,*, 8,3, 56 
520 RESTORE 620 FOR f »0 TO 7: 
READ a POKE USR "t '*•#,•) NEXT I 
OATA 208,22*. 192,64,6* ,32, 16,5 
6 

530 RESTORE 830 FOR I «0 TO 7 
READ a POKE USR " u "tf,a NEXT 
DRTA 71,79.103,31,0,0,0,0 

' 3 TO 7 

.. NEXT 

fTfl 208,22*. 194, S30. 58, 2, f " 



1100 PRINT AT a ,5. 
9,5, "W^ 

1199 RETURN 

1200 PRINT AT 8.7, 

1210'pRINT AT 8.5, 
9,3, " 



3755 LET L> 
GO TO 9508 
3760 LET ip, 
3*99 RETURN 
3500 RETURN 
3581 REM 

5502 PRINT 'AT ' H] b 
T IB h-2. " ,1 -, INK 
PAPER 7 



INK 2, " A " 



1300 PRINT 
ie.9, " W" 
1310 PRIJ.T 



IINT RT 8.7, INK 2 

1399' RETURN 

1*18 PRINT RT 9,9, INK 2 

18.9, '■ 
1*20 PRINT AT 9,11, INK 

t ie, H, ■■•a>- 

1430 RETURN 

1505 GO SUB 1100 

1307 PRINT AT 9,11, INK 

T 10,11," " 

1520 PRINT AT 10,13, INK 



10, 13. 
10, 15. 



m. **#13;-<ff" 

1530 RETURN 

1600 GO SUB 1; 

1615 PPINT AT 

AT 11,13," 

1628 PRINT AT 

BT 11, IS. "'.'j'" 

1530 RETURN 

1705 PRINT AT 10, 15, 

AT 11,15, " " 

1707 GO SUB 1300 

1710 PRINT AT 11 , 17, 

AT 12, l?,"^" 

1799 RETURN 

1380 GO SUB 1400 

1610 PRINT AT 11,17. 

RT 12,17. " 

1815 PRINT AT 11,19, 

hT 12 X9,"ti>" 

1828 GO SUB 1400 

1630 RETURN 

1900 PRINT BT 11,19. 

AT 12,19;" " 

1910 50 SU8 1500 

1920 PRINT RT 12,21, 

AT 13,21, "<y" 

1930 RETURN 

2000 PRINT RT 12,21, 

AT 13,21," " 

2010 GO SUB 160O 

2020 PRINT AT 12,23, 

AT 13,23, ■■'y , ■ 

2030 RETURN 

2100 PRINT RT 12.23- 



INK 2, '• " 

ink a," ,-."* 



i PRINT RT 
3,23, "Li" 
i PRINTRT 



12.23, 

10, IS, 
12,23. 

11.17, 

12,23, 



INK 3, " 

INK 2, " 

ink a, ■• 

ink a, " 

INK 2, " 

INK 2," 

INK 2; " 



2999 RETUP 

3000 PRINT 
AT 13 
3010 I 
AT 11,13," 
3020 PRINT AT 
AT 13,25. ■ '-;'■ 
3030 PRINT RT 
RT 12,17, ">{i>- 
3090 RETUPN 
3120 PRINT AT 
AT 13,23," 
3130 PRINT AT 
AT 12,17,- 

a 140 PRINT AT 
T 12, 19, -Vi>- 
3150 PRINT BT 12,27. INK 3, "jf" 
T 13.27, 't" 
3199 RETURN 

3208 PRINT RT 12,27, INK 3," " 
T 13,37, " " BEEP .01,10 
3210 PRINT RT 11.19, INK 2," 
AT 12,19." 

3222 PRINT AT 12,21, INK 2,"^' 
AT 13,21, ■■•$>■' 

3299 RETURN 

3300 PRINT AT 12,21, INK 2," 
AT 13,21," " 

3310 PRINT AT 12,23, INK 2, " rt ' 

AT 13,33, "<&" 

3320 RETURN 

3400 PRINT AT 12,23," ". INK 3, 



00 PRINT AT 1 
13,23. "LJ" 

10 PRINT AT 1 



r.r 

34 - *. , 

BT 13,23, "y" RETURN 

3380 PRINT RT 12,25," " , AT 13,3 

B," ", INK 2, AT 12,37, "fi-. AT i3 

,37, "W' 1 RETURN 

3K0O BEEP .01.10 PRINT AT 12,37 

, " " , AT 13,37, " " RETURN 

3699 RETURN 

3700 RETURN 

370i r-r.r- irrtTMTiWiKiftrtmrt.1 -m 



3^35i...* NK 3 - 



READ ( BEEP .Ml.t/S PC.E USR 
\*l.t NEXT I DATA 169,16.32 
, 193.239,250,254,224 
7870 PRINT FLASH I. INK 2 . RT t ; 

7999 REM 



icTeep 



INK 0, " - ", 
2, PAPER 0, ' 
" J" AT 17.1 
"■".BT 19.1 



8000 PRINT AT 9.3. 



.AT 8.3. 



: lA5h 1: 
BEER .1,13 
b. FLASH 1. 
BEEP .1.12 



BEEP .2.-4 BEE 

.a, -* beep .75, -e.s 

5520 PAUSE 10 BEEP .2.-6 8EEP 
.2,-6 BEEP .2.-6 BEEP 1.-9.5 
5525 IF «p«=l AND - 

N 00 TO 5601 

5530 GO — 

5531 REM 
5680 RETUi . 
5601 PRINT AT 

2, PAPER 0, "MB" 
5610 BEEP . 1, 11 
P . 1 , 15 
5620 PRINT AT 16 

2. PAPER 0; "*•" 
5625 BEER .1,10 
P .1.1* 
5630 PRINT AT 16. b, INK 

1. PAPER 0, "©£T 
5535 PAUSE lO 
56*0 BEEP .1.21 BEEP . 
P .3,21 
5650 FOR I>1 TO 300 STEI 

.001, f '5 PRINT AT 0,7, inf. o, 
PRPER l.SCW- NEXT f LET SOU 
300 

5660 PRINT BT 15 , b, INK 0," 
T 16,b-2," ",AT 17,b-2." 
".AT 18, b." ";«T 19,b-l," 

3670 PRINT AT 20, b," " , AT 21, b 

5699 LET t>>22 GO TO 933 

5998 RETURN 

5999 REM | 



SEE 
BEEP 



6880 RESTORE 6880 FOR I .8 TO 7 
READ Z POKE USR " »" ♦ I . I NEXT 
f- DATA 20,14,14, 1*. 254. 23* .25*. 
8 

21, 0, " » ",AT 
(-23 LET b* 

6028 RESTORE 6820 FOR I >0 TO 7 
READ 1 POKE USR "»"»f,i BEEP 
.81,-' NEXT I DRTR 56.36.56,38 

, 184 ,248.2*8,340 

6030 PRINT BT 21,0," " RETURN 
6999 REM 



8001 RESTORE 8081 FOR I .0 TO 7 
REBO a POKE USR I •'.* NEXT 

' OATA 1.3.7.7.7.1.3.7 

3010 PRINT AT 6.5. IN" *. — m» 
7.5." 

5020 PRINT RT 4.5, H "-AT 3.5. 7 



5030 DATA 1,7,1.7,3,16.32,22* 
S035 RESTORE 8035 *0R I .0 TO 7 
AERO C POKE USR > •' ,C next 

8040 DATA 8,192.0.192,32.16,8,56 

9045 RESTORE 88*3 FOR < .." TO 7 
RERD C POKE USR "«".*.; NH" 

8030 DATA 0,7.165,103,226,19,9,7 
8033 RESTORE 9055 FOR I »8 TO 7 
AERO C POKE USR A •» .( NEXT 

9060 DATA 0,192.64.192,136,152.3 

8, 197 

8878 PRjINT RT 4.21. £■ A .AT 3 

8888 LET »q.33 LET b>5 

8890 LET *q«.23 

3093 LET y»."" LET v»«"" LET * 

• >■'" LET «f."" 

809B LET lrap»0 

8099 LET C»b 

8100 ir INKEV«>"5" AND b-3 THEN 
CO SUB 9508 

3103 LET »c-»C*INT («4*l.St 
8103 PRINT AT 0,0. PAPER 1. INK 
6, " SCORE- Hoaa«t vivtnti 

".li.BT 8.7.*< 
9110 LET iqa-*^-2 IF INKEVti'3" 

AND b.tqa TMEN LET b'b*4 
8128 GO SUB 770 
8140 LET *q«.iq 
81*3 LET a>b*3 LET i<t>lq-(4 RND 



AT 13,23, INK 

2110 GO 5UB 17U0 

2120 PPINT AT 12.23. INK ; 

AT 13.25, * i ^" 

2130 RETURN 

2200 PRINT RT 12.25, INK i 

AT 13,35." " 

2210 GO SUB 1900 

2238 PRINT AT 12.27. INK 

T 13, 27,"ji" 

2222 RETURN 

2300 BEEP .01,10 PRINT AT 13,37 

J INK 3. " ".RT 13,27;" ■ 

2310 CO SUB 1908 

2320 RETURN 

2300 GO SUB 2080 RETURN 

2600 GO SUB 2100 RETURN 

2700 GO SUB 2200 RETURN 

2808 PRINT AT 12,37, INK 3," 

T 13,37," " 

2B10 PRINT BT 9,11. INK 2," 

T 10,11," '• 

2320 PRINT RT 10,13, INK 2," 

AT 11,13, "yl" 

2B30 PRINT AT 11,19. INK 2 . " 

AT 12,19," " 

2940 PRINT AT 12,21, INK 2, " 

AT 13,21, "W" 

3399 RETURN 

3910 PRINT AT 10,13, INK 3," 

AT 11,13,- " 

2920 PRINT RT 13.31, INK 3," 

AT 13,21," " 

2938 PRINT BT 12,23, INK 2," 

BT 13,33, "W 1 " 

2940 PRINT BT 10,13; INK 2," 



7000 RESTORE 7800 FOP f -0 TO 7 
READ i POKE USR "A"*f,* NEXT 

/ DATA 0,1, 3, 7,23, 19,17, 11 

7010 RESTORE 7818 FOR ' «8 TO 7 
READ a POKE USR 'V *f,a: NEXT 

I DATA 0,128.192,334,232,200,13 

6,288 

7020 RESTORE 7928: FOR f -0 TO 7 
RERD t POKE USR "»"»f,a NEXT 

I OATA 7, 3, 3, 2, 6, 0, a, 

7033 RESTORE 7023 FOR f »8 TO 7 



H 



7030 PRINT 
23," «T" 
7060 LET l 



at sa. aa. " 
aa 



A ".AT 31, 



7070 LET _ 
7098 FOR 9-h TO 7 
7095 00 SU8 1800* (9*10) 
7103 CO SUB 770 

7107 FOR f»14 TO 30 PRINT RT I, 
NEXT f PRINT IM 



.23," A", AT 



OR f-1* TO 
■ j, *r.K 3 L "Mf ' 
K 3, AT I .337TLJ-- 
7114 PRINT r~ • 

7128 IF i.13 RNO (9>4 OR g - .1 - Th 

EN 00 TO 3781 

7138 IF INKEY««"7" TMEN LET .-»- 

a 

71*8 IF a -12 THEN CO TO 7388 
7190 NEXT 1 LET h »2 00 TO 7098 
7308 DIM bllOl FOR '»1 TO 10 L 
ET bin i>2S-f »2 NEXT f 
7310 DIM allOl LET atll-13: LET 
!'.■■■;■ LET i, '..■.'.-. LET •(*)■ 
11 LET a(5)«18 LET a (6) -10 LE 
T a (71 -9: LET 4(9) -9 LET a (9) *0 

LET a (181 «8 
7520 LET f-1 

7338 LET (-a(f) LET d*b(n 
7S3B FOR i-l* TO 20 PRINT AT i, 
23, INK 3,"M:' NEXT I PRINT IN 
K i.AT i ,23~^" 
7537 LET a»-"7T" 
7338 LET t a -8 
73*0 FOR h-9-1 TO 7 
73*3 LET icnoINT l(13-»lf)l/l. 
31 

7543 PPINT AT 0,0. PAPER 1, INK 
6," SCORE- HOH*«l vivantl 

",U,AT 0,7. i< 
7530 PRINT AT C,d," " , RT C*1.4, 
" ". IF j-1 THEN PRINT AT 13,23 
, INK 3,"U" 

7533 prIn"at a in . b< r i , - j -,at 



8158 LET if* 

o inkev«.-5' . 

EP .805,23 

8133 PRINT RT 4.3," 

8137 PRINT AT 8,3; " 

8160 PRINT RT 4.b,"U";AT 3.b,'I 

8161 LET T r »p- \ ,- *r . i IF trap-6 
THEN LET (f*P.l PRINT AT 6,5," 

IF b.3 TMeN CO TO 8780 

8162 IF lrap>-2 THEN PRINT AT 6. 
3. INK 4,"W" 

9163 PAUSe^O 
9165 LET c-b 
8198 LET a-b»2 LeT iq-»q-(4 RNO 

82e0*PRINT INK 1,AT *,»«), "fit" , AT 

*±»A. "I» '" 
8270 IF vlx.it AND u«>"" AND b > -9 

TMEN BeEP .03,-18 LET (q-tq-4 

LET b.b-4 
8280 LET x|-Ht LET ot-vf LET v 
t'"l IF > »*n«»vl*U*-"aO80" THEN 

BEEP .03,-2 LET *a.»q.4 LET b 
-b.4: LET u«-"" LET v»-"" LET 
#»-"" LET XI-"" IF »q-a? TMEN 
00 TO 6608 
9399 00 TO 8100 
8380 PRINT AT 5,8, " " , AT 4,3;" 

",AT 3,2, " 
3310 RESTORE 8Sl8 FOP f «0 TO 7 

READ c POKE USR "m *t ,t NEXT 
f DATR 0.0 8.36, 44,124, 68. 31 
8528 RESTORE BS20 FOR ' -8 TO 7 

READ C POKE USR >"•',<: NEXT 
f DRTA 31,235, 11,113, 139, 3,*. 28 



8330 RESTORE 9330 FOP f -8 TO 7 
READ t POKE USR ->"*l.( NE»T 
I DRTR 23* . 83* , 324 , 193 . 64 . 64 . 33 

8348 PRINT AT 4.2, "«'■. AT 3 . 2 . "»> 

8530 BEER . 1 . 18 
8533 LET *r. .» < *2S 
8360 00 SUB 778 

9563 PAUSE aa _ „ „ 

8367 RESTORE 0367 FOR '-8 TO 7 
READ C POKE USR l"*(,e NEXT 
I DATR 13B , 193,64 ,333. i94 , 13a ,2 
00,340 
9578 PRINT AT *,2," It ".AT 3,1 

5559 let AP.fi:, ^ jk^mh'Jkt | '|^ U '' r ' 



3399 REM I 



P« 



-0 TO ; 



*?i? e?:« ee-?. 1 ^ 3 ^;^ 1 ?^^ 



NEXT 
NEXT 



7563 IF 



' 6.3, 
THEN PRINT AT 6,3, " 

>a AND 



I ORTB 0,1,3,69,71,33,17,9 

3718 RESTORE 3710 FOR f -O TO 7 
REAO 2 POKE USR "»"»', 1 NE'T 

r DATA , 138 . 192, 183.338,20* , 13 
2, 1'9 

3720 RESTORE 3720 FOR / .0 TO 7 
BEAD I POKE USR "*"*', t NEXT 

' DATA 18,7,3,3,6.12,36,0 
3733 RESTORE 3733 FOR f 18 TO 7 
HERO I POKE USP " ,f *< .X NEXT 

I C-ATA 240,234,192,193,96.46,28 
3748 PRINT AT *,b, FLA3M 1, "*»" , 
AT 4*1 ,b ,'fiA" 

3743 BEEP .81,12 BEEP .83,8 BE 
EP .83,6 flEEP .01,12 BEEP .03, 
8 BEEP .03 ,6 BEEP .03,-10 BEE 
P .03.-12 BEEP .1,-3 
:-730 BEEP .01, la BEER .03,9 BE 
EP .03.3 BEEP .01.9 BEEP .03,8 
BEEP . 03 , 3 BEEP . 03 , - 13 BEEP 



736* IF INKEY«-"7" AND 

-10 THEN GO TO 8088 

7365 GO SUB 778 

7567 IF ATTA IC,<JI<>57 THEN LET 

4-C LET b-4 00 TO 7980 

7338 IF INKEV«-"7" AND (*<>18 OR 
f <>9 OR If?) ANO ta*l TMeN LET 
»a-i*.l BEEP .81,45 GO TO 773 



7569 IF la.-l THEN GO TO 7738 

7370 IF INKevf-"3" THEN LET f.f* 

1 IF f -il THEN LET I -10 

7699 NEXT h LET g-3 CO TO 7340 

7738 LET Iflltl 

7731 IF f.10 OR F«9 OR '-7 THEN 

LET 14>0 LET teaiC-M BEEP .85 

,-18 00 TO 7699 

7733 IF f-10 ANO K )2 ThEn LET la 

■8 CO TO 7370 

7760 IF il-B TMEN LET *J-"A" L 

ET ti')'*(Ot3 LET ta-0 GO TO 

769* . . 

7770 LET l«."* IF 44-2 THCN L 

ET III! •»<*. -2 

7799 rem ini'iia^ in ■ lillll III I ■ 

7600 IF b-23AND' ' bOu ">25 * OR ' bOU ■ 
8i then 00 TO 7369 

7810 IF f'l THEN PPINT AT 4lf-ll 



8640 PRINT AT 4,23,. Ink 1 , " 
FLASH l.BT 3.23."fc»" „ __- 

8630 BEER .01* 6EEP .03,* BBE 

aeeoVoR *" P jq 1 sI* stcp 3 prim 

T RT 0,7, INK 6, PAPCR l^K*' » 
CEP .081,"* NCXT ( LET It-tc 

3670 PRINT RT 4,21," U " i BT 3 

,21 



3673 BEEP . 1,2 BEEP 
. 1 ,6 PRINT AT 3,28. " 

" ft ",at s.ag, ■• n." 
.seas tEEP . i.e aeifp 



8698 IF i; .hi THEN LET 
9699 PAUSE 300 CO TO 

2700 PRINT AT *,5, INK 
T 8,3. " t. '" LBT *>9 



'.AT 



T«"5* 



HCMU C KUr.C U]K I •',! "t»l 

I DATA 3,*, 8, 21, 34, 36, 36, 3* 
7840 RESTORE 7B40 FOB t -4 TO ? 
READ c BEEP .801.C/S PQKZ USR 
■f -*I.C NEXT I 6ATA 193.33. IE 

*H!'S|i?S«iSSf| FOR f-0 TO 7 

READ (. BEEP ,081,w3 POKE U3C 

7"tf,C NEXT I DATA 31, 73,10a 
,31,36, 13,159.2*9 

7860 RESt6«E 7630 FOR '■« TO 7 



9330 NE-T ' 

9330 IF *C ,h» THE" LET 

9340 PRINT AT 13,3. FL 

,."T i ink e, paper 0. 
??ToinPut On it.om ,o/fti*> ■ .u 
4390 IF ui<2"n" TMEN CO to * 

9196 PRINT AT 13,10. FLASH I AU 
RCUOIR. . - STOP ... 



M 
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Sommaire 

■ LE HIT DES KIDS:Les petits ont choisi pour nous. ..el 
pour vous! 

■ GEOGRAPHIE, Programme indispensable avant de partir en 
vacances, sur ZX 81. par F. QUE RE. 



+ = 
TOTO. 



LA TETE A 



Ce jeu consiste 3 donner la re- 
ponse a une operation posee 
par l ordinateur. II est possible 
de choisir une operation parmi 
les guatre pronosees ou de 
laisser le choix a I'ordinateur. 
Une suggestion: Modifier 
eventuellement le dessin du 



LE HIT DES KIDS: 

Les programmes publics dans le cadre de c 

se~lectionn6s (et apprecies!) par des enfanls, i 

Tl 99/ 4 A 





R.DONDEY 


■ ■ 




90 SCH-O 




■ 


HO CALL CLEAR 


120 PRINT 


"A 0UO1 VOULEZ VOUS JOUER - >" 


Pf [NT 




1 


- X...TAPEZ...I' 


ISO PRINT 




160 PRINT 


- *. ..TAPE*. ..2" 


. ■ ■ ■ 




: -:■ 'fl-it 


- -. ..tape?. . .;•■ 


; ... PRINT 




■ 




210 fRINT 




■ 


' < - - : TAPEZ 3" 


■■ 




?40 PBIH1 


"OUEL EST VOTRE CHOIX"*" 


. .. . 




740 INPUT 


NR:":CHI 


400 CALL CLEAR 


■U '■ PR 1 HT 


"OUEL NIVEAU CMOISIS5EZ VOUS 


.■■ 






~. . .FORT TAREZ.. I" 


a .-. ■ 1 PRINT 




■ 


-.. -HOYEN TAPEZ.. 2" 


460 PRINT 




470 print 


".. .FAIBLE. .TAPEZ.. 3" 


480 PRINT 





490 fMNl -OUEL EST VOTRE CHOIX'' 
500 PRINT 

310 INPUT ' Nf-.--.rf-J 

600' CALL CLEAR 

610 PRINT "C0M8IEN DE COUPS":;::: 

611 PRINT "V0ULEZ VOUS JOUER?" 
/,:■■ f PINT : :: :: 
630 INPUT -COMBIEN''.. . ":NU 
640 CALL CLEAR 
6«*> RErl 

691 REM DEF DES CARACTERES 

692 REN 

700 FOR 1-96 TO 125 

7 1 'j READ CM* 

7Z0 CALL CHAR CI, CM* 1 

'30 r*.Al I 

»40 DATA 00000103070FQDO; 

Fio?oT,8oaosoeoeoG 

730 DATA 0000070F1BIB,OOOOEOF01818181 : 

OOOOOOOFBF 

760 DATA 000000030", ieiB3OE0E03O18t 8,0000 

770 DATA ""OO'.eiSlBiaiSlB. 000000000040606 



78o data ex r7OFlSJateia,OO0OEOF ( O0OO0Oe0F0 

'■■■■:■ data leiBiBiFiFiaiaia 

BOO DATA I81B18FBFBIB1B1B. 181818181818 
BIO DATA 1BIBOC07O7OC18I8 

82o data laiaiaisieiBiaia 

- . f r f- [-130 TO 143 
READ CHi 

• HA! ' I.CHtt 
160 NEX1 I 

DATA OOOO78301SOCO4«,OO«MeiCliraO*OC.OII 
ClB3a7B,CD6O30ieiCtE 

U90 DATA '■."■OO'.'O'FTF.'JO'.iOOOf'CFC 

900 data ■ i ■ ■ ■ ■ ooooooioi . ooooooooooooeoe, 

901 CALL CMRRtlW.'IFIFOOOOOOOOIFlF') 

902 CALL CHARf I33,-FBF800000000F8FB"I 

905 RE« 

906 REN DEPOULEHENT JEU 

... . PF _ M ... 

Al I SCRECNM2) 
950 MP-0 

931 CALL CHAI'C33."FFFFFFFFFFFFFFFF-> 

'/".:■ CW L CMKI47, "fFFrFFFFFFFFFFFF"l 

. : nf,f.., :a . ft! FFFFFFFFPFFFF") 

'934 CAL£ COLOR' I. 13,11 

. ■ . i '.DL0R''.',9. 1 ) 

- .■■ call color c9, 7, 121 

960 cau color! 10, 7, 12) 

ca or(ii«7,iz) 

■■'.!■■ . ■ . I . 

990 CAl I COLOR (12, 1 • J . 1 ' 

992 CALL COLORU6, J4,l> 
994 CALL COLOR I 14, 13. II 

993 CALL CLEAR 

996 GOSUB 11 ClOO 

997 NP-O 
•J^H BO TO 73O0 
1000 FOR 1-1 TO 3 
IOIO FOR J-l TO 2 
1020 IF V-O THEN I 
1030 IF II THEN 1 IOO 
1040 IF J 1 THEN HOO 
1030 GOSUB 6OO0 
106O GOTO '. 100 
1070 IF I 1 THEM ! 100 
1080 IF J 1 TMF.N 1 ;■- 
1090 GOSUB 20OO 
1 1 00 READ U 

1110 CALL HCHAR1T.1.NC-J, 
I 120 NEXT J 
1130 NEIT I 
1140 RETURN 

1500 CALL HCHARf IO, I". I '■■ 
1310 CALL HCMARUO, 1 1. I ;i 
1320 CALL HCHARlll. 10.132 

1330 CALL HCHARU I. I 1. I '' 
1340 CALL MCHAR'12, IO, 1 -* 



I3O0 


CALL HCHARU2. 1 1, 1331 




1 360 


RETURN 




1370 


CALL HCHARUO, 10,1381 




1 390 


CALL HCHARC IO,l 1,139) 




1600 


CALL HCHARf 11, 10. 1401 

CALL HCHARU1, 11,141) 




1610 


CALL HCHARC12. 10, 1421 




1620 


CALL HCHAR!12,1 1, 1431 




1630 


RETURN 




I640 


CALL HCHARC 10, 10,32) 




I6S0 


CALL HCHARUO, 1 1,32» 




; 660 


CALL HCHARC 11. 10, S36) 




1670 


CALL HCHARf I 1. 1 1 , 137) 




1600 


CALL HCHARf 12, 10,321 




1690 
1700 


CALL HCHARU2.il, 321 
RETURN 




1710 

1720 


CALL HCHARC 10, 10, 138) 
CALL HCHARC10.il, 139) 




1730 


CALL HCHARCU. 10,32) 




1 J 40 


CALL HCHARC 11, 11, 32) 




1750 


CALL HCHARI12, IO, 142) 




; 1*60 


CALL HCHARC12, 11, 143) 




1770 


RETURN 




1780 


CALL HCHARCU. 18,132) 




1790 


CALL HCHARfl 1, 19,1531 




1BOO 


GOTO 30OO 

IF IK 10 THEN 2100 




20tO 


IF X'20 THEN 3000 




202© 


IF X<30 THEN 3020 




203O 


IF X'40 THEN 3040 




ZO40 


IF X<30 THEN 3O60 




2030 


IF JK60 THEN 30B0 
IF K<70 THEN 3IOO 




2O70 


IF X'BO THEN 3120 




zoeo 


IF X<90 THEN 3140 




2O90 


IF X<100 THEN 3160 




2100 


NC-NC»1 




2110 


IF X'O THEN 31B0 




2 1 20 


IF X-l THEN 3000 




2130 


IF X-2 THEN 3020 




21 40 


IF 1-3 THEN 3040 




2130 


IF X-4 THEN 3060 




2160 


IF X-3 THEN 30G0 




21 70 


IF X-6 THEN 3100 




2 1 BO 


IF X-7 THEN 3120 




21 90 


IF *-B THEN 31 40 




2200 


IF X-9 THEN 3160 




5000 


RESTORE 4000 






RETURN 




3020 


RE5T0RE 4010 




lOiotoioioi.BOBoaoeoBoeoBoe.oioi 


OF 181818, 1B1B18F0E, 1B1B1B1BOF07, 




•1010101 010101, eoeoaoeoeoeoeoa , 03O60 



01013F3FO101Ol,8Oa0BOFCFCaO8OO.OI01. 

3030 RETURN 
3040 RESTORE 4020 
3030 RETURN 
3060 RESTORE 4030 
3070 RETURN 
3000 RESTORE 4040 
3090 RETURN 
310<j RESTORE 4030 
31 10 RETURN 
3120 RESTORE 4060 
31V) RETURN 
3140 RESTORE 4070 
3I30 RETURN 
3160 RESTORE 40SO 
3170 RETURN 
3180 RESTORE 4090 
3190 RETURN 
3200 RESTORE 4 IOO 
• 3210 RETURN 



DATA 102, I"'. 108. 1 

DATA 112,11 1,114,1 

DATA lis, I 19. 1 |4, I 

DATA 1 IB. 1 19. 121, I 



4090 


DATA 118.1 


4|O0 


DATA 


A ■> -■■ 1 




„ ■.;.., 


: 1 1 ■ „ 








[| ! . ■ ' 




PRINT 




uoto 


1 ■:■ 


... ... 


VI", 


,1 . 1 tH 


SOtA 


1 I . ■ - ! 


3" |7 


BOTO ' 


SO* 


T»e 




FOR • -r in 1. 11 1 


-,..4. 


Cl-l?" '2 



3060 
5070 
3080 
3090 



GOSUB IOOO 

NF.XT Y 

IF ES-2 THEN 3130 
1 SC-5C*lo 

> PRINT "SCORE ■■ 

< FOR 1-1 TO 300 



5165 
5170 
51 SO 



6O40 
6030 
6O6O 
6070 



ES»0 

NP-NP*1 

IF NP-NU THEN lOOT- 
GOTO 73O0 

F 2-48 THEN 3180 

F Z-49 Tnrrj ■■ 1 

F Z-30 THEN 3020 

F Z-51 THEN 3040 

I-S2 then 3060 

Z'53 IMEN 3080 

Z'54 THEf 3100 

Z-35 THEN 3120 

THEN 3 I 40 



F Z-3< 

F Z-57 THEN I 



7000 • 

7001 I 

7002 f 

7003 I 

7004 I 

7006 
7007 
7020 
7030 
704O 
704- 
7050 
7060 
7070 
7IOO 






CALL SCREEN' 7) 

PRINT -SCORE --,S 

FOR 1-4 TO 7 

CALL SOUN015O0.-I.01 

NEXT I 

CALL CLEAR 

CALL SCREENC12) 

DR-l THEN BISO 
Dfl-2 THEN B6S0 
DR-3 THEN 9670 



7310 
7520 
7530 
7340 
7350 
7600 
7610 
7620 
7630 
7640 



7660 
7970 
77B0 
7990 



O020 
BO30 
8040 
8050 



DR-' 



vi:m 



CALL CLEAR 

cmit'-i then aooo 

CHK-2 THEN B500 
CHX-3 THEN 9300 
CHX-4 THEN 9000 
CHX>-5 THEN 7600 

INT C 10-RND) 
II- 1 then TbOQ 

i! 1 then 7600 

7Z-I THEN 8000 
77-2 THEN 8300 
ZZ"3 THEN 9300 
HEN 90O0 



I i M 



A-INT.IIo-l-riD) '\ 
IF NV<-1 THf N BO40 
IF NV-? THFN BO60 
IF NV>-3 THEN B07O 



, r ■ - j - 



■ NV- ■ 



I Bl< 



I IF NV-7 THEN 81 30 
1 IF nv,--. THEN 8140 

IF B<6 TICN 8O70 
1 SOTO BI40 
> IF B<4 THEN 8070 



81 70 NC-4 



8187 NC-S 



R1«4 
8190 
B200. 
87 IO* 
B220 
8221 
8222 
8223 
8274 
B230 
8470 
84 RO 



B520 
8321 
8330 
n-,40 
8350 
8331 
B560 
8570 

ir.oo 

8590 
86OO 
fl6l0 
8620 
8630 
8640 
8643 



X-X-10 
GOSUB IOOO 
GOTO 1780 

REN 

REM ADDITION 

REM 

DR-2 

A-INTUOO*RND) 
AA'INT I fuRNIl! 

IF A» -99 THEN 8303 

B8-INTI10«RND1 
RC-tfRfi 

:>99 THEN B330 
l"\ THEN B390 
J-1 THEN 86 IO 
F NV.-3 THEN 8640 
F BC<63 THEN 8500 
OOTO 8643 

BC-40 THEN 8300 
BC»64 THEN 830O 
O BA43 
F »C>39 THEN 830O 
■ AB*»C 



CM I '.' MARc; 



RESTONS SIMPLES ! 
Cette page educative etant 
reservee aux enseignants, 
lequipe de Redaction ne 
portera aucun jugement de 
valeur quant a la qualite 
pedagogique des program- 
mes ouarticles publies Les 
critiques emanant d'ensei- 
gnants seront toujours les 
bienvenues : elles seront 
pubhees et transmises aux 
auteurs concedes 

P GLAJEAN 




stages LOGO: une proce- 
dure speciale Hebdogiciel. 

LOGO repond present, grSce a GREPACIFIC (association specia- 
liste de I'enseignement et de la reflexion autour de LOGO. 51 bd 
des Batignoiles. 75008 PARIS), des stages de formation aux lee- 
teurs d'Heboogicie! (25% de reduction sur les prix de base!)- 
Une occasion a ne pas manquer. 

STAGES PROPOSES PAR GREPACIFIC. 

1) ORGANISATION 

Ces stages on! une duree de trenle heures {cinq journees do six 
heures] et couvrent les cinq micromondes classiques {nombfes, 
texte, tortue. musique et lutins) 

Les matenels utilises sont divers, pour permettre a etiacun do de- 
couvrir les differentes versions de LOGO qui existent actuellement 
et de se faire une opinion libre sur le matenel et le langage pai une 
manipulation personneile. Aucun pre-acquis theonque nest de- 
mande (ni en mathematiques. ni en infonnatique, et I'expenence 
prouve qu'il vaut mieux ne pas avoir ete 'deforme* par un apprentis- 
sage prealable de Basic) ; toutefois. it est vivement consetlle d'avoir 
lu. de maniere attentive les carnets d'Helene. fascicules 1 et 2 (edite 
par GREPACIFIC) ou les articles LOGO parus dans HEBDOGICIEL. 
avant le debut du stage : cela permet de liter un plus grand profit du 
travail sur les micro-ordinateurs. 

Les stages sont essentiellement consacres au travail sur machine, 
dans des conditions analogues a ce que sera le foncttonnement 
avec les enfants en classe : L'apport theonque magistral est tr6s 
reduit, au profit dune libre exploration par des projets do groupes. 
Une part importante du stage est consacrfeo a lutilisation dans un 
cadre educatif, avec compte rendu des recherches et experimenta- 
tions en cours. 

Les stagiaires des annees precedentes qui ont ou la chance de faire 
equiper leur lieu de travail dun (ou plus rarement plusieurs) postes 
LOGO ont tous ete a meme de demarrer des projets avec leurs 
eleves. II est done indispensable d'avoir deja une certaine pratique 
pedagogique (dans le cadre scolaire...ou familial) C'esl dire que nos 
ateliers ne sont pas destines aux enfants eux-mernes. 
La participation a I'atelier (non compris les frais d'hebergement) est 
de 1000 F. 



2) LISTE DES STAGES : 

DORDOGNE : 30 Juiitei au 3 Aout (quelques places region de BER- 
GERAC) seulement, il est demande d'avoir deja manipuler un peu 
LOGO, quelle que soit la version). 
ALES : 27 Aout au 1er Septembre. 
LILLE : 30 Aout au 4 septembre. 



3} INSCRIPTION : 



Le bulletin ^inscription est a retourner a GREPACIFIC, 51 bid des 

Batignoiles. 75006 PARIS 

NOM: 

PRENOM: 



AdreMe: 



desire m'inscrire an stage d'initiation A I'approche LOGO qui aura 

leu: 

du au 

du au 

Ci joint un cheque de 375 F„ a lordre do GREPACIFIC. dans lo cas 
ou le stage serait annule faute d'un nombre insuffisant de candidats 
(moins de 6 inscrtts), lo cheque cl-Joint me sera restitue. Je verserel 
le soWe soit 375 F., a louvorturo du stage, cost seulement dans le 
cas ou je ne mo rendrais pas au stago que GREPACIFIC aurait la 
taculte de garder mon acompte 
Lu el approuve. 
Dato ot signaturo 



(a relournor a GREPACIFIC, 51 bW des Batignoiles 75008 PARIS) 
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9OB0 OOTO 9IOO 962.^ P-INTUOO.OND1 10070 INFUI "SI OUI TAPE7 1.. -,R£ 11223 NE.l'l ' ' ' "ww 

9090 IF 073 .MEN 9000 9630 00- INT I IO.RND. 10073 SC-O 11224 CALL CLEAR 

9IO0 0-INTIlO.ftND..| 9640 PC-B.BB IOOSO IF RE'. THEN 931 11297 CALL COLOR ( 1 2 I) 

9110 OB-R.D 9630 IF BC7AB THEN 9620 l'7O90 FOR 1-1 .0 IOOO 1 1 ?9B CAM COLORL2 2^11 

9111 IF »B^99 THEN 9005 9660 R-AB-BC IOIOO NF7T I 11299 CALL COLORI3 2 1 

9120 X-B8 9670 X-AB lol.O CALL CLEAR 11300 RETURN ' ' ■ 

GEOGRAPHIE IS.iS?*?? JT, 6 "!, a '°' s *."! ,e< ;' lJre ' " une P r6,ec,ure '^io- - u™ •* cllgnote sur la carte. poionee de jeu) il lam place, le sees ne sort pas reproposeos. 

3^ i 1*9* du > eu esl a f ale ■ - 5 noms de vines s'aflichent. cutseur clignolant a leroplace- .) Option :-srtL* FaSovSnertT 

VoiUt ur, oFocamroe cm., ar, f^^^S^"' \S. " C ? n °' e Sur la ,Sf rte Si " 0n chois ' t : 2 6ssals Possibles, merit suppose. On demande La France est dMseTen 4 par- 

<S!L^a^^ZJSSL to9 i L^S/T. t . , ' °" J2SS on passe (P s '"°"- • Sa S el aPP'ociations. aloFs le Fesullal par la louche O. Bes. I s'agit d-indFqueF rapSe- 

pjr»»ede lajon artrayante les Les miles se presenlent par on demande son nom louche Les villes trouvees au 1eF ou 2* Sur la Rose des Verts les cor. ment dam ouet oiarlnliilii. 

Z£*r£££2^Sl ordVodimconaFX^ avec une in- 0) On peu. Feven,r en aFtiere essai ne sort plus reproposOes Factions TSraiKtei aSo^F ta&. ta v^p^ST On 

t£Z<£?an?SfiSSint^ %?Z£Z!?L?322°£i2£ gf' L J* la : ,eveni ' au ., me "^ 2 lon P 61 " ainsi - si °" le **» VVmaa* en inve^«»rvkieo cboislt ■ duree de TreioSe ( 1 4 

plus de 100.000 t-ab.tant^ ?"J,S?2 ^rS ^m JSST 2 ' Op " on : c , .' ouver la vllle P'°P°- epulser la lis,e des ^"ss da "S les directions necessaires. 9 seooodes). Si loTne ttouve 

I . «». .. i. ™ F< iV? RE . '^^sen' 6 '00.000 habnants, see paFmi 5 : 3) Option : place, une ville: Colalion: 10 villes a 10 points et pas dans le dotal fixe ou si Ion 

^T%£JZ^T"J JZ?t2 ou^MeuF^acedaFislOFgan,- Suivantleprincipeclassiquedes Un nom de ville esl pFoposee. - 2 par louche supptementai- sTtrompe. la ville denote sur la 

des le ctiargement. les d«Fen- saooo administrative une p.e- OCM: Avec la louche 5. 6, 7, 8 (ou .es. U aussi. les viiles propo- carte et tch msuqueO 

" " ^*i rirl4M2 ana ItH 003UB RC •• 3740 LET 0.0*1 

HtMaiMJ' ^JJ*CTrLil°WlllilLM* 3« EtT^iJ.S.'rr. it" 9 o«»m-0" tnin oosue 10 |3j| oosuj ejf HS HU Sr'o.o.a" 

COROCTBRES CN WlOCO INUERseC : 319 LeT K . C 00E Ki-aO TSa* ..... _. 322? £2$X B -£~ 37SS If 0-2 THEN OOTO 303S 

3oa IF ... no KvO tmfn OOTO .a- 100* 003UB :r 2300 OOTO 2920 3768 C03U0 TO 

LtONt CRRRCTtRES: ||| loJui'jgS K ' 8 T " tN 00T0 385 }01| J03U0 lOOJ 2401 RFN JUS btNT 377! OOTO %•»• 

,3 ..."URFRRNCf mWZaFa fflWttSr? |t§! rS?nT-RT~-!..;u. M f8&J&. , -° ! * 

7t» ..."ON CONTINUCT" ;;,,,- v.noi Qti'i^.u i*« rn i(\. le6a 205US PL 3(182 LCT JH ixtHiiiio 3839 POINT OT 6 8 . "■" 

9*1 ..."PUBIS ,a,3M) ..naR5CILUC « 3 ,3, LE ^ Y ' yfil - Bt(»#H-13 TO 16* Jjn Ir INKCYt--©" THEN PRINT «T 35415 53SUB PR ^^^ 3883 OOTO 376« 

. . .LYON. . .T0U1_QU5C. . .NICE. . Rtfta l ft ui.e. r i «\.n u Tn ii\.«i l i*' y l 3 Bl8 tO S»5*i« 3818 PRINT RT 1«.B;"B" 

NRNTES. . .sraasBOURG. . . BOBO 225 nrTnBrj l lae " INHEY«-"P" THEN OOTO 117 2638 OOTO 2620 383B OOTO 376B 

CRUX...5T ETinr-E. . .L_= nO'-JRC iit lfT S.L.EN fitylft ?.-«. . -^ 26Bfl RCM Su0 ■M'iifT "rr'" 1 3636 LET Z-lB-a.lT-1) 

...senses' ^2| ^:| e^Sae i 132 Ir ^ WKevt-"M" then ooto 122 27ae let jt.-^KMimmm ■■ sbsb ir z<« then let z.« 

598 REM RRPRENORE gS LSTT MsZaaS ?. » - ,„ .— a795 GOSUB PR 3837 LET S-StZ 

1999 «EM 1 POBfll 5 lil rS CoIsbS SMS OOTO 1089 371B RETURN 3038 GOSUB SCO 

2299 ...2D CfiflNCC 30- LFT Tolana ll!,a U!T ^'f 1 - 3 2888 LET J , . " .HV^BHtaMnH " 38** POKE orcc.PC 

2298 . .. ■;« yies&RR- 22S \Ji Ttllflaa JJ2S ^ F , N -i 1 I MCN L ET N»l 3686 003UB PR 3888 OOSUB aB6< 

23*9 ... SCRIE terhinEE" Jaa tr ^rn.rwa ' 175 PBI « T 0T l^ «- ' PMW " aaia LET S = 5 + 5 3686 COSUB 3872 

2BS8 ... ...»BBflU0...*-' iSI {"ft Cg2t?7B9 1178 Zr N>4B SND c TmEn5oTuTT9 2829 GOSUB 2870 38B9 COSUB fS 

2-592 ... C US" NICUX * a 5 ^ET pP^Bsa 5 * a 2 60 f;oTa S31e 3962 PRINT RT * .0; "•«■*■■■»" 

2956 . . ."COTRTION" *S? ^£J flFliSio, llBB NC^ N a5 »° L *T «| -R« 1 1B*N-1B TO ) «fl» { ajfi* NEXT P 

3999 REM PlRCER UNE ylLLE JSi HEZ HFllRftS 128 2 Pt »INT BT 19 , 9; "TERMINE . . . . " TO 16#N-16) 3BB8 GOSUB CONT 

3711 ... ES5RI NO *2§ ml,S F? »H 2°5 UB I£ 2552 »E URN - 3B7S zr INKCVf-O- THEN OOTO SAB 

*839 HOI SITj-R RRPIDEHENT *»* nnrn k.i««» IS2a C05u8 er a879 L CT RS-R* (16*0* (R-l) •» TO I 

4135 ... r* Hfl g°i °.^* l Sl2 or - M - NT 1299 RUN He *R J ( TO 16»0»IR-1)1 3B76 OOSUB Er 

*312 ...'.>.><(<*- SSI 253 t 2 ISTSi l6efl f0R "- 1 T0 3e as ' a L CT Mi-R|I17 TO ) 3969 RUN HE 

4830 . ..'2...1.. .3.. .*. ." BSS ZrirF T ^^^^^^^^^^" 1629 RETURN 3878 IE 0<4B RND C THEN OOSUB 91 41BB OOSuB *89B 

525 KS^d* lass qosub zr a *na oosuo re 

?S2 BFH ?mb aiir-Hf 168A oosub 1890 asee return *iaa rr inkcv*--0" then oobub *e 

■ "2 5It.it 2'"Ti a -a.Tf.nrMF 1UP 166B LCT "•■'■•••••••••••••••♦♦•L 3999 OOSUB CPE 09 

-— » m OH - 63a PRINT fiT a -" e ' li-TOUCHE SUP ES qrrnDES UlLLes UONT SE PBESEN 3906 OOSUB EE *130 GOSUB EE 

^WTK rt 1 UJ rno n.4 rn . Tcn PHfl OPOPE D IHPORTflNCE . CMBOU 3918 RUN HE *13S PRINT RT SB, 9, ■'■•HENU" 

# ^W. \^ ■ 2=1 r,25r U .. U C CPRRCTEBE NOIR INDISUflrrr 189 9 293B GOSUB Zfr 4280 PRINT RT S.a, "OUREC. "j 

■W* SsS So?ir bt 31 n " a MfHeiTflNTl.^IEMDRONT ENSUITE 3925 OOSUB CONT 4308 LET 3-8 

22S t5 ™,/Fv.,i— 'thf.j dfturm !- c5 PRErECTuRES B 3939 fiETURN 4306 LET P-0 

JPEH as 1 R* 552, A^^SSFlC" C RETURN lftftl L _ T M J .Hi*" , I ♦ -PREEECTURC 39B9 PEH PEOLE 4208 GOSUB SCO 

REH Lfi'r*6fiicF Hi SOTO 669 . •♦- PREFECTURE OCGIQNRLEJj. . COMP 2992 GOSUB EE 431B GOSUB TO 

29 REM CI foSL ,„»,. 5*S 5^t.5 U St^* R ^ mh<» a, 1 -, a ' 5 ° •■■■iio" 2986 LET H] .'■..,.» .RPPUYE2 SUR L 4219 LET Kt-INKEYt 

23 Re" « ail -«E £ 1/199* 679 PRINT RT^T,3. t—lfcl . ftT 13 16M GOSUB 166S Q T0yOjib£_LR UILLE OUI CL ICNOT 432B LET K-COOE KJ-28 

SB POP N-a TO T t ■ii.-^fFm ■"'' 1 -' 3 ' 5 ' ' - p *'^ 1SB3 RCTURN E . . . IBBBHSEI IB UILLES P. IB PTS 4334 If KB--H" TH(iN GOTO 4360 

3 pSint ?fl;° a ^-fj-^-^- issllra B ■minue_„_ i§*s ?§g *.? t^l?n g h.-3i oij - ^^^ ="^---^ pbi ^ * aa = r - ^ ,a o " *»° TMeN ° ot ° * a - 

69 FOP n. IB TO 31 ■ 7B1S Eipl " T «T 1T78, fAHLiaiiHBMBl 1666 lp:t li.hkm TO noil 29SB COSuB OP^ *239 PRINT RT B.19;K 

fil PfilNT RT N 13 ' .«l»4lBBBB>>«4>>>>» ^-, t» -w 1- t-f^ ooruT or -« a l 6fla p RINT f T 9, 9, Li 396« OOSUB TO 43*0 FOR P-l TO 19 

■ ^iNT HT N.ia, ^^mt^m^ 7«1 IJ NOT C THEN PRINT RT , lS.e 167B NCXT N 3964 PETURrj , 4288 LET N-IKT IRN0*0) *1 

53 nmyrr N - r ^ & "TC ,Q. , RT 16,9. UILL 15Be C05IJB T0 2999 REM WlM ■■■■■■ 1 ■ 4268 Q03U8 CO 

5? SleJ-STO 17 ..^ _ % OOSUB TO I!" Ir «»»<»•»■ THEN OOTO 16 3979 LE^SoTW*^ *383 !F X>*B RNO V,3* THEN LET N 

m- * "-'■ 3 ' J " 7 - ■^■^■^■^■■1 ?82 gETURN 1695 RETuRf. 313B Ir INHEV « . - 0"' THEN UOiUH L? 426* Ir X<-*8 RNO Y>3* THEN LCT 

73 NEXT N 8 *S PC K 5y B " ,0T 1B89 PRINT PT 1 7 , 9, "B-REPONSE " . P. «* NO-2 

,Z ScTtVt Cf 1 1* ■ <4B«a>B<4_> ■ „ 8S ® U" P1 -0 T x ^ T 18,8, ■■a-CONTlNUCR",RT 19.8, "fc. 31*9 GOTO 3890 4368 IE X < -48 PND Y,.8» THEN LET 

T 14 1« ^OO » iiiSo.flr'TH, ' ° 598 Pi OT X ,V RCUCNIR" . P.T 38 , 9; ■■■•HEHU" 3233 REH SU8 ROSE DES UENT3 NO-3 

l-.«i" F.OueRE'-,RT 18,81," |g e r ^g T .i T0 fl 1891 RCTURN 3239 RE" SUB Hse DBS UENTS 4388 IE X>*9 BNO Y < -a* THEN LET 

9B L.BT M*'M4l 311R >k, .u-, 869 NEXT T 1819 PRINT BT 6,8,'UOULEZ U0U3"; 33*9 PRINT RT 6 , 8, , 'N" , RT ?,*,- NO-* __ 

_ao L.ET ,|. 3**1.3138.9*11.0097 5 7a RC TURN BT e.l,*'L.R RCGL^ 7", " ; BT 8,3. "U C" , RT 9,*," " , B *378 PfilNT RT *,8;Ut 

'.„ , _ -.. .,-„ ,__» ja _, ,„ m , 971 REM 1811 COSUB TO T 19,6; "S" *280 FOR 1-1 TO K*B 

ilia ilJ III' i;JS" '"' !!1 SBl LET fl t.' *53i1i,tf^—fll 1912 RETURN 3238 RETURN *29« IE INKEVtO"" THEN GOTO *33 

i»3 iltrr ai.at.',i^'ia-,i -.•■>-. -. 7 mKmmm** 5 2iaHWT^^^^4 3B 1.35a let bi-r«(ib«*9*i t? 330e REH SUB 8 

133 iSvi aS^T s-?? 3F 3 .?. 2i2i 3 2i2 saBKuTrT. ^tsOl* 333 1^0 let n-i 33si ^oaua er *389 next i 

5 2«B i^S li.i iii? 3 ?i^' a " |W<TE3.>» 995iWra9B0URG..5ei 1979 GOSUB 916 33e3 LET H*. "•••*•»••« t*BueC LEi 4319 G03U9 SCO 

'*i F^ a2l22 ?l3?3 a3?2 3 ;. . , SMf-DERUX.* SllEtT ETieNNE* 383 19BB RETURN TOUCHES 3.6.7.8 PLRCCJ L 431B FOR I - 1 TO 3 

al7%5^ ,Wi.,? i^^?'''*'' 3 3T HR.JOE 3229MjNES». " 1999 REH HMfprlifl P ^ILLE PROPOSEC . . . Lfl TOUCHC U *338 GOSUB PL 

1*B LFT'ai;o;."2a«? 3 2?i-. -,«-. . MS LET R«-Rt*"lTO3i8NTPeLL.»4 3881 LET PR.3*3a OUS DONNCRR LES CORRECTIONS R RP *3ll8 NEXT I —-«*-- 

,:!*.VsI S^t*;.)?? 2i2i"' aiB3 ' 5 56B7«OijlON. 3»34l-IHS 28Z2 LET tFr.2780 PORTER EN LES PFFICHRNT CN NOIR *33B IF □-■ THEN QOTO 4353 

ili fSb'? ? 3 i*263.8888. ■ A^SaBlLue** 2*3lKe8T 2019 OOSUB BE SUP LP R03B OES UENTS..." *33B NBXT P 

13« R0INT RT It, 18. ■ aRRNO ES'^R T aia L rr st.a. . *m^SRRr.« t 35.. fen.n. .... 3S0S &63U6 SCO .339 SOTO 4315 

Ai*-RT I '^ E l7'*;».S?*£TujP* rr *!J8^ULo8*i"!;nM3"cri"SLJuiLLe. j||l ?§R U 3.|"?S 2 MM go|u| R0° OM OOSU., CF 

^BrV. 5 .iVSlts 33PO I = ?" ... 4300LR0N. 4434BCRU0RI3. aiofi LCT O-lNT 10/SI.1 3510 roc P • 1 TO le 4335 00303 470O 

ie« lct et. aiaa.aaaa.aaas.iaat aeaasRiNT lo. .tSacuoeux. aiea let outii .Rt ne.u-is to is. 333a tiosue ro 437a run nc 

■i« 'OR R.ss to so '??! c C?V R,..;:'e33aeRR Lt aiia lit u.u.o "so boIue'cS T '° , " > , °" 1 t"? oosuflco" 

ei^3 :g°.f u,,L "" T0 " T0 ""- sSoistSri.!;?! "j!5S3s«?lEm. lisS NeJr u n U * Q alii rr!nt ot i.e. • ujjjjjjjjjjtjjjjjB" 443a eosuj aBBS 

HI •&&"■• ssiise^os;- tst4cSRRT*RB3. i,,s tF ;:JrT o^rf'T-s a, 353a i jf u ».a j|f: IHvPto » 

(II J|f.|..„. TO 1 .BSONBLUN. ,aaOT«OVB3. IHI LBJ v.^OJIR., TO 4, M.J Or Ljjj i^T, ! ^ tSbn'pR.NT RT 1 . 1.. 

lit PR-N- RT 1M AT » a« ■ i13 LET a «- p «* S339CHRUH0HT. 2198 PRIST PT H- 1 , 9; H, " -" , Of (HI I 3S78 LCT L -L * i INKCV •-"6" RNO L «2 ,|PP,. Th . m do, ht RT I 19 " 

i, h W" ■ "-s? '^^st tf- 3 Sf isnssissti£. hSBH: 3i5§ oosub pl M%wwS% * w c,a *##? ! 

i s *l ^sShF RT^i'ss^Si-'Sr itiwsssse: ssto^ssf: Hi SpMsm" p«ai uWQl h9 "«??!Ta^- 8 tpg-ar^ 8 a8i "■ 

3i ?4 "2Sp2onf^ + rt *4i 33 "He6tTE " _ a 5"* Ir INKCV.--" THEN OOTO ai90 369J LCT OFCC.PEEK 16396*286. PEC i«J U,38. M . tflB 2S, B 

21,1*. ESPPONE ,BT 81,83. NEOITE g 14 LeT (, j.R», 4.886BL0IS* 3238 IF INKEY«-"H" THEN QOTO 398 « 16399 *«« ?8TijRN 

R-*a nrr fl».- Q1 i FHor M F««lTTO, •• * 5 3* BOURSES. *03*Nl?UERS. i 3619 LET PE-PEen DFCC *«gS ?nS,,- U 2F 

;2! iPo "•: ^ueMPGNEBiairBL *3a3CHRTeRUPOU/.8883LONS te S.. 8839 IF K-28*R THEN OOTO 8609 3630 PRINT "•■■ J69S pg? u 2. e r..., .,,,,,,,,„ P pa N 

g| SrinWn.^.rb.n,!. ^83hSuliSS^ y ' 3SI!5*5St X . rs " ?.S a B K,afl 0R K> " ™ CN O0T0 a 0"* Ir INKey •''" ■' ™ eN 00T0 37e c^Se L ?SoSuE ^uIsee'crrSoNES" 

aiS L^ T fi.."BTLBNTIOOe- 8831HPC0N. 3481BOUR0. 8848 IF LW|(>" THEN OOTO 824 3640 POKE 0FCC ,«„ ggggSrg^M'^l^^Sc^ 

282 FOP N-8 TO 17 ftl . ,_- c ., f__- DDTWT aT „ ,. ,. ■,,— ■■■ ■ S 6T5B l * INHEVf« H THEN ouro 3WS «... une VILLE 3 RFFICHC.IL FRUT 

It 55;T T N flT N ' 1 3-"" N -' 1 |l* RETURN 1 28B0..PRINT PT K -89 ,8. — -^ J 6M G0T0 „,, PEPONORE RRP roEHENT Rued LeS TOU 

378 FOR N-6 TO •- ttl8 LCT B|.Pf . "3489LR ROChELLE. 53bT 003UB PL 3'0« PEH POSE OES UENTS CHCS DC 1 B * CO TBTION 19 U 

373 PC-NT BT 2 1? ^^^tltaaaaaaaiH 4Cja0OueReT. SBiafiNGOULEHC. 239S IF INKev.-"" THEN OOTO 3382 3'» 8 LET T.T.I **11 LET H6-H». ...LUiMiiDn... 

:;? ^StiV,,^ H -- 7 . .H8.i^lllllllllllli^ S719RNNCCV. 36ieCHHHBEPY . 3268 IF CODE Ink E ." * -28 .R then CO 3^in let q- 8 ^^ ILUES R 19 PO.INT,,. , .COHf'RIS 7 

3BR . FT fli.-dMi .,,i -w,-. .n>. 4816PCPI0UEU/. 4316TULLE. TO 3a$e 3'11 PRINT RT 4 . 8 , ' iBUHHa^H -,T HMMBk" 

faS.'SaaS'SiSS 3 '' 8631, * l * ,aB 3319Ufll.eNCe. 4913LE PUY t 8388 OOftUB EpF 3?13 GOSUB PO 4638 GOSUB RE 

•SSI'fSS'S-? 1 ^^ *51*PURlLLfiC. - 5358 PftlNf SY 9,9, "..BEPONSe. .. 371? IF C > INT IX/8) THEN OOTO 37 4638 RETURN 

a2j mSS, nr il? -. -rn m „a, a> * a ® LET Ba-R« . 9B l*Pfi IUP3. 2878 FOB 8-1 TO 19 99 46S9 REH SUB N7IR 

.•» C Tn W ?f L0 UBL * T0 ai • lJML *• 4918HENDE. S713CPP. 3877 NEXT B 3729 IF CUNT (X/81 THEN OOTO 37 4790 FOB 1-6 TO 13 

3«R LFT a*.R*[A TO i 4212CBM0PS* 4618R0DEZ. 8389 PRINT BT 3.9.QJ1R.9 TO I 90 . *'93 PAINT RT 1 , 19; "■■■■■" 

Im nftT -V 4811PGEN. S7110I0NE* 2298 LCT j I . gWUmtfllM 3723 LET 0-0.1 4718 NEXT I 

IIS I-sirt". a ...—...... ;•»■«"" « "»«••"•»'-«• fin W.s%c ooro .. H 3pi S^tSr .iJiJ,,.. TH.N .o jja^i 

tl';J''lT a ,'I^R% ClTrt f .i?lRb!oNON , :''-'S3Sa»u?N!"- |33g gSSSS W Wlu-t .......rai «.. pif£f~ nM m- 

I °BodSt'f T -It i « 'it oi Sri.2 i o-' 3607PRU. 3897TRRBe3. 3336 NfiXf P TO 3B19 8129 OOTO 290 ■ 

RT 9 3 "SlLLf ' RT* lf'a "i SlTUE *8e7CRRCR330NNE.*3*6F0IX. 233a RfiH FIN 

££« M 2?1 h'"l r"!r S •.""*'''!. " ImS aosurj'RR — — "™ - . , . I . 

e , m %rnJiiimtmn as.. ooIub^cont o Tno< (oro aa a / a sem aine procname • • • 
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LETTRES ET CHIFFRES 



ll ne sera plus necessaire desormais d'attendre 18 h 
55 pour asstster aux "Chiftres et des lettres'. Votre PC 
1500 s'en chargera! Mieux, au lieu d'assister vous par- 
ticiperez, l'ordinateur se chargeant d'etre voire adver- 
saire. Les regies sont exactement les memes qu'a la 
television: 2 tours de lettres et 1 tour de chiftres alter- 
nent et ceci quatre fois. L'ordinateur et vous avez suc- 
cessivement la parole en premier, pour annoncer le 
nombre de lettres trouvees ou le compte atteint. Le PC 
1500 n'etant pas le Petit Robert, la longue liste de 
datas s'impose. Pourtant, si le programme sous sa 
forme actuelle sature la memoire des variables il est 
possible de le modifier et de rajouter des mots supple- 
mentaires pour une version 16K. 

Jean Charles GEHIN 

Tour de lettres: Vous avez 45 secondes pour former le mol le plus 
long possible: 

Sort l'ordinateur vous donne le nombre de lettres qu'il a trouve, au- 
quel cas seul un nombre plus eleve vous permettra de prendre l 
tour a l'ordinateur. 

Soit vous avez la parole et pouvez rentrer votre mot si l'ordinateur 
n'a pas mieux. 

Tour de chiftres: Apres son annonce 6 plaques apparaitront ainsi 
que le total a ototenir et enfin le compteur de seconde a I'extreme 
gauche. 

Si vous arnvez au compte est bon ou plus pres du compte que 
votre ordinateur, il vous faudra rentrer la facon dont vous etes par- 
venu au compte. 
II taut proceder comme suit: 

Lorsque I'ecran devient: 6 plaques, 0, puis? il vous faut taper les 
cakruls dans I'ordre suivant: 
Pour tajre par exempte: 6 + 2:6 ENTER + ENTER 2 ENTER. 



■ ■ 
'.■-.. 

■ 
TTRES I ;.-.*'■ 
tLPIPMn' ■ 
I, ■ ■ 

.■■■: ■ 

3l8:GCro 2Q1SB 

iaea:uoi r bi print 
LEG ehi 

FFRE5" 

ia83!e*»"-iSF*ets 

F8"*' :SP=B:C 
P*B:K=8:KI--e 
:RF-=8 
1818:for i = itq le 

:BHU)=SIBI 

UNEXI I 

182B:F0R 1^1 ro IB 
:Oi«c]»iB>.« 

STRt llNEXT 




78: 



■:ClE* :L, 

, I W*3 <.. _E» 

a, .27, ~.I«f2*)? 

H3, E*tWW*3 

F*t74)*3 



'(SO*>" :»*= 

-:r.!*=- ' 
8:RO*D0n 
8:LE4i8)--' fcBrnp 

iMi HamopiKSi 
uu«v2* 

for i^jro Be: 
REOO fl*U>: 
next i 



38:U0IT 0:fl-RND ? 
:ON 060TO 188, 

i ae, i as, 1 1 a, n 
a, i is, i is 

88:o-RN0 B8:no»=Q 
• COKGOTO 128 

B5:0=RND 24:P0*^F 

*{OJ:GOTO 128 

O-RND 88:n04=8 

»<fl):GOT0 128 

S:0^PND 3B:no«--r 



i20:so*^no*;a=LEN 

PO«:B=9-0 
130: IF B-8THEN 280 
14B:FDP 1 = 1 TO B 
158:Q^RN0 ?6:nO«--P 

04*PID» <LE»(0 



118: 



FOR 



. "j ■ 



NEXT I 
?5:FOR 1=1 tO 88; 

P£OD EUDi 

NEXT 1 
80: FOR 1--IT0 24: 

REOfj Fid;: 

M£xr i 

9|:PRINt - Ll 

S LETTRES 
95:FDP F£=ltO ? 



', 1 > 



, I, 1>:NEXI I 
285:FOR 1=110 3 
2)8:0=RND 3; IF FRt 

<(l)i- '"TWEN 21 

8 
22B:PR*=PR»*FR*<0) 

:PB*(Q) = ' " 
238: SEX t 1 
248:PR!NT "LETTRES 



258: CURSOR 22: 

PRINT TinE HE 
4: IF TinE c>8. 
384 5 THEN 258 

2S2:lP=lEN SOi 

255: IF InT CKtV2>- 
KTV2THEN 278 

2S7.-W01T J48:PRJwr 
"J M-ilPt" UE 
TIRES" 

259: INPUT "ET UOUS 

?";nl: IF nl>9 

THEN 259 
268: IF NL<=LPTHEN 

410 
265: GOTO 298 
278: IHPUT -NOHBRE 

DE LETTRES ?"{ 

NL: IF ND3THEN 



3BB:DF=lEN PJ»: IF 

DFONLTHEN 408 
318:n6=nB*0F:PR»^' 



■":NEXT I 
1288:F0R 1 = J TO 6 
1210:G-RND 4 
1228: IF 1=1G0SU8 

1680 
1230: On G50SUB 13 

ee, nee, 1500 

, 1550 
1248: NEXT 1 
125B:G0TO 1790 
]388:Q=RN0 6: IF C 



323:SF^SF*UOL C* 



134B:RETURN 
1488:0^RN0 6: IF C 
•(fl)=""THEN 



428:SF=SF-UOL C» 



140: RETURN 
15aa:ft-RN0 6: IF C 

<(«)=■•- THEN 

1508 
I535:1F C«CO>="j" 

THEN 1400 
1518: IF SFHUOl C« 

(0>>399THEN 

1558 
)52B:SF-=SF*UOl C« 



J54B:RETURN 

1558:o=rnO 6: IF C 

t<OJ=*"THEN 

1558 
15S5:1F C*(fl>«-1' 

THEN 1380 
1568: IF SF7U0L C* 

(0)>339£3R 

INT (SF/UflL 

UOL C*CA) 

Then 1488 

1578:SF^SF^UOl C« 



. 18: PI ■ IRH 
ie08;a-R-<' 

USF-UOl 



C»'i 



:C*(0 



■■■ ■ . 
1788; if sf< iee 

rHEN BZEP II 
GOTO 1808 
!785:SP=SF.RND 2- 



1720: MflE =8 
J?3a:CURS0R 27: 

"PINT HUE » 
1E4: IF TIME 
O0.B845THEH 



1736:G0T0 1765 
174B:UPII ; INPUT 

■'COnBIEN ? ■■ 
;CP 

175e:0=fl8S tSP-CP 
176B:B--09S tSP-SF 



I: GOTO 17B8 
>:U»1T 148: 

PRINT "J ORR 

IUE 0";SF 
i: INPUT "ET UO 

US ?"iCP 
■:fl=0BS CSP-CP 

j:B=B9S tSP- 

SFJ 
II IF 8<=BTHEN 

1778 
I: GOTO 179B 
l:UOIT 118:CLS 

:PRINT -J 01 
MIEUX :"! 

WAIT 8:PR1NT 

SFi - :-jSF«i 



a:' 



rinE 



:"i9B:^f * 



=8:ClS : 
1 = 1 TO 6: 
PRINT D*U)J 

- ';:next I: 

CURSOR 16: 
print K;- -; 
: INPUT R», U* 
. T* 
178K1F TIHE IJE4 



GOTO 1815 
178S: IF UOL R*=K 

THEN 181 8 
]786:«1=K 
1738:F0R I-1T0 6: 

IF RI()D«I) 

THEN NEXT I 
I 3081 □*(!) = '■ ■' 
!918:FOR 1-1T0 6: 

IF TtoD»(]J 

THEN NEXT 1: 

1*1*1 
1812: IF K=6THEN 

1828 
1915: IF UOL T*OK 

iOR Ki=0TI*EN 

CLS :U0IT 14 

8:PRINT "On 

uEUT TR1CHER 
?' , ;9--l:032: 

00 TO 177fl 
!817:G0T0 1825 
I328:D*(I)=- " 
I825:"F--RF*1 
I9"-(8:G0SUB U« 
1848: IF KOCPflNQ 

RF<^5THEN 17 

B8 
18S8: IF K=TPTHEN 

Uall 8: CLS : 

"PINT *BI£N. 

..•:N«-NB-b: 

NEXT KC:GOfO 

2BBB 
1968:9=1 :Oi2:GPTO 



IBB • ■ -•• 

■i 

. ■ .- 

Ufli - • ... - i ■ 

..... ii. 

RETURN 

1928: -'X = bOi. R«- 

vQl T*: 

6E rww 

1938: - - i 

m. ■ » i 

SEIUPf" 

2880: BEEP 1,288,7 
SiSEEP I, I 16 
,225:9Erp I, 
158, 196:SEE? 
1,3/, 575 

2881 .-Jfltr 41: 
PRINT " 

2805: BEEP 1, 288, 7 
5: BEEP 1,116 
,255:8££P J, 



PRINT -SCORE 



2B2B:PPlN 



';*Br 



'JOUS 



01 :- 

2038: IF NB>NDfHEN 
PRINT -HOUS 
GOGNEZ. . .": 
GOTO 2188 

2048: IF N8=nOThEN 
PRINT "EGOLI 
TE. . . "IGOTO 

285B: IF NBtNOTHEN 
PRINT "J£ UO 
US SflTS..." 

2188: END 
5888:PRINT ' 



I £1 



OU 



S:9E£P 1, 149 
, 190: SEEP 1, 
149, 188:3EEP 
1 . 1 1 1 i 232 

5B10:BE£P 1, 118, 1 
15:8EEP 1, 14 
9, 35: BEEP I, 
2B8, 75: BEEP 
1, 149,288: 
8££P I, 149,9 
2:8£EP 1, 149 
,238 

S81S.-UOIT B:PRINT 

S828:PRINT ■ 

PROPOSENT 

5825:9EEP 1 , 28B, 7 
5:3EEP 1, 143 
. 19B:9£EP 1, 
143, 18B:8EEP 
1.111. 232 

5030:8EEP I, UB, 1 
I5:BEEP 1, 14 
9, 95: BEEP 1, 
119, 115:9EEP 
1,97,295: 
BEEP 1, 11 1, 1 
20: BEEP 1,37 



NT 



, 383 
5035:UPIT 7:PI 



5B40:nOIT a:PRJNT 
■'jN PPOGROrM 
E DE J-C 6. 

5845: BEEP 1,37, 16 
5: BEEP 1,96, 
32S:8EEP 1,8 
6, I58:8EEP 1 
,37, 285: BEEP 
1, 119,258: 
9EEP 1. 149, 1 
88 

505e:8F_£P |, Ufl, 7 
■J0:BEEP l. I J 
3, 188:BE£P 1 
. 143,288 

5855: wait 7:RRlNf 

5868:m0IT 8:PRJNT 

CH1FFRE 

^ ET LETTRES 



IBBJflEEI .. 

143, IBBiBEfR 
Ii 149,95 

. . . 

I 
■ ■ ■ 



5aSfl:3ECP .. i 19, 3 

5038: »r ' 

10888:f)OrJ ' EDI MO 
NE' . 

OH . OLLlGOT 
OR' , BONNIER 
E-, BCNOEROL 
£■', 'CfiBROCKE 
R- 

18818:0010 'ChonCE 
LER", ■■confip 
PEE-, roNFis 
que 1 , -cw.riu 

ER". "CUISINE 
E", ' OESORnOl 

S" 

jee28:O0TQ "ECONOr 
1SER-, 'ENQUE 
TEES", "EXALT 
EES", "F10RIT 
FRONT I 
"GRELOT 



TER" 



"HOHICI 
.'■, "iSLani 
I' , "1TESOT 
■, 'ENJOLiU 
, "LIOU1DI 
', "ra&NETi 

O "ENTREn 

:■■, -nEsoco 
:-, 'niSERE 
', "nlRIFlO 
', -noROLi r 
"HOnTEUSE 



■H'THIOUE 
"NO1SS0NC 
"NOTOTOIR 



18a7B:DOTO "OBSERU 
ER', "SUBODOR 
ER", "OHBILIC 
S", "ORCHESTR 
E", "0R0TR1CE 
", "0U0T10SNE 

1BB3B:OOTO "POLPIT 
ER", ■pOLnERO 
IE", '■BOUOUIN 
' , 'PORONYrlE" 
, "POSSOBLE", 
"PATCHOULI" 

18890:0010 "POIISS 
IER", "POSTOR 
OLE"-, "PE OOLO 
G!£", "PED16R 
EE". ■ REPECHE 
P", PEN3I0NN 
E" 

i8iaa:rjoro "pepini 

ER", -PERCUTE 
UP", "PESFORO 
NT", "PERIODE 
S',"PEPIOSTE 
", "PERPUTONT 

10118:0010 "PERSEC 
UTE", "PERSON 
NEL", 'PEUPLO 
DE", "PHONEPE 
S", "PHOSPHOT 
ES", 'PIOUETQ 
GE' 

18128:0010 "PI TOYO 
BLE", "PISC1N 
ES", "PLOSTIO 
UE", "EPPOIGN 
E' . -OPPQiMfF 
P' , POLlSSON 

18138:00(0 "P0ITR1 
Nf ", PfUCtUE 
R", "PPFCrrrf P 



Le 27 jullHsl. un numem 
quadruple pour le prix de 3 
numeros. 4 programmes 
par ordlnateur. 54 peqff 
24 tranct chez votre mer- 
chand de journaux 



■ 



■" ■ ■ . 

E" 

cooro ■■paoicn 

LE", -PECEPTI 
ON", -PF6ISTR 

■ ■ 

. ,; ■-. 

". "REPONTER" 
ll 
■ 
■ 

I ■ - 

', RESC0UJ3E 

■ . 

3; 00 TO -RESULT 

PR' . EnWE 

*■, 'RUBRUUE 

", 'S0NCT1FIE 

' , SOUC1SS0S 

, SC-'-BPEu'- 

3:0OTO "SCElER 

OT", SCENPRJ 

0", ■ SEPEUSE" 

, SEniLLONf 

, 'SEROPHIH-, 
SIOEROLE" 

a;ooio -sionis 

ME", "SOLLlCI 
TE", "SOULOGE 

r- , ■ sfRoaisr- 

E", "SUGGESfl 
F-, "SYNCHRON 



18280:0010 "TOB0I1 
ERE", 



"TOCT10UE 
-, "TOPISEE", 
"TOlOCHES". ■ 
TANGIBLE", "R 
01DE" 

l:DOTQ "TORTUF 
£',- tORTINE" 
, TOSSEOU"," 
TENDRES-, ' TE 
ttPERE", "f£NO 
ILLE", "TRONC 
HE' 

1:0010 "TESSON 
S'f "iHOLOflUS 
", "THEPnOL". 
■IIROGF", 10 

rtfllSOHS", "TO 

RTURE', "TORP 

EUR" 

I: DO TO "TOUCMF 
P", TRQCQiir' 
, TROGEniE". 
■TPONSEPT", 
TROPPER", "TR 
OUBlER', TUB 
OGES 

):00TO "tyPHOl 
□E", "TUYOUX" 
, "DESUNIR", " 
UTILITE", "US 
UR1ER", "U01S 
SELLE", "UQR1 
OBLE" 

):O0T0 "UELOOR 
OPE", "UELOUT 
£", "UEPP1NE" 
, "UER01CT", " 
VERSATILE", " 
OnONOlNE" 

):noro "PINQHO 
UET", PROPUL 
^£", "DEFORPr 



."FUSll 



.OOE 



18270:0010 "ECUIOi 

■£■ . ■ nixE'jR", 

c CPO£UR", ■ i 
Rl TERIUH", 'I 
OirCUSE", ■ 
0C1EUSE", 'El 
BUONT 
18298:0010 "FhROLi 
Nf , ' ES0U1F 
, QDHI-MFS' 



SP 



LIOM , 

■ 
■ 
■ ■ 

18238:00(0 ..njadf) 

■ 
■ 

.'POL.'-' 
PCUPO-. -£lOU 

cones 

..... 
run -. 
'i;-, oesrsx 

OSF , PICOOU 

. aucacc 

. . 
ns 

13310:2010 "SJ.-EsS 
UCL', 
UOE-, "OECOIH 

LON , -8E0UC0 
UP", -1*OTE«PO 
LO', -SEXTUPl 
£' 
18328: DotO "OBJECT 

, 'noco . . 

ERROYE', -Out 

RERH1N' , ■ fa- 
TUREE', CUBE 

r«E< , ■ ar»: - 

EUR" 

18338:0010 "ECffJTE 

OU", "ECLOTEU 
R-, 'CENTOURE 
-, 'COPTUREE- 
. -COOUETER', 
CREOTURE' 
l834e:D0TO -TMCEU 
S£*i "CORIEUU 
E'.'EXOCTEUR 
",-SUDOTOlPE 
•', -OUOTERIES 
".-OUTRfFOIS 



' I SOLO T 
'■OTOPIS 
■SOURIQ 
■aurops 

oo«no 

OUtORI 
'OUTORI 
OUTORI 
O20ILW 
ORImBO 



;f!.i(j«: -■:■.. 



1ES" 



1837B:OOTO "PROSIY 
LE", "GOiiUENO 
RO", "ESCROCS 
", "ROCISPES' 
."TRE1ZIEPE" 

, "UEsriauuE" 

18388:0010 "&OZ0GE 
NE", "CONUENl 
R". "OPHtOLni 
E" 

18398: OOTO "OUDIBl 
E', -OPIOCES" 
, -HUPEROlE", 
"INDUES", -PO 
NEYS-, "ONE CO 
0»£". "C0URS1 
ER" 

10480:DOTO "nEOION 
E", "C180ULES 
", "ECHOUONr" 
, "EBOUBIS", " 
EOLITHE", "UR 
BOINES'■,"SU^ 
ERQIN 

I04IB:DOTO "OKONES 
", "80URR1DES 
", "ONEURlNE" 
, "0RPEN1EN", 
"PORISIEN". • 
BONCOIRE" 

l8478:OOTO "N0U0R1 
N>, POGISTER 
", "ONGUlLLf 
, "OLYPPIOOE" 
. "EPERSIONS" 
, R0BI01ER' 

18438:0OTO "FIBULE 
", "FOLUNEE", 
■CQDnlEE", "F 



Suite de la page 13 



TRS80 



3189 'RFFICH8CE 5'UM "E33WZ EN CR05 CflRfCTERES 
3118 WT0U6-33, 183. 288. 19.13- 1J.24. 247,8 

3113 'flFFICHflOE O-tJH PESSflCE EN ^ETITS CflRRCTERE3 

3128 CRT8ia6.33, 193.280, 19, 13.24.2*9,9,8 

Z12Z 'CONVEPSION a'UM N0H8CE ET FFFICHfiCE 

3138 DflT«, 233, 4. 214. ia,«, 231. 198. 39- 19,27, 128, 6,233, 4,214. 18, <9, 251. 1»,», 18. 

27,128. 199, 49- 19. 281. 98 

3133 •GEHEPSTEUR OE MOWRE 8LEflT0IP£ 

3149 DOT8213, 223.22, 8, 93.237, 93, 111, 39,3. 123- 1^3. 23- II 1.237. 93. 173. 38. 3, 123,293. 

44,121.124.68.223,289.281.8,8 

3143 "W;S-PROC*flrf€ X NULTIPUCflTION 

5138 &PTP33, 9, 8,41, 283. 39, 49, 1.23.32,248,281,8.9.8.8,8,9.9.0 

3153 'FCLUmCE D'UN SEC^CNT GRPPMIQUE 

5168 WTR229,295.34, 121, 132, 119.225,281.9,0 

5163 'EXTINCTION D'UK 3ECPENT CRBPHIOUE 

3178 WTR229,283,34. 121.47, 166.1 19.225.291,8 

5173 'TEST 8LLUWCE D'UN SEGMENT GRflPHIO'je 

3199 WTR229, 283, 94. 121, 166.223, 281. 8. 8. 8 

3195 'DETERPINfrTION &E Lfl POSJTIW [>•'>£ C83E HEPOIRE 

5198 DRTR213, 197, 122, *6.233. 44, 214, 3, 242. 99, 121. 199,3.293.39,68.71.62. 128.7,16.2 

33.38,8,6.6.41,16,233.22,68,71,7,128,23.193.299.281.9,8 



3193 'R0PES3ES UES CHAIHE3 WWMIQUE3 

3299 CATR144, 121,8,0,8,8,8.9,8,9 

3283 TXRImES GPPPHtOuES 

3218 WTOI31,13I, 131, 131, 131, 131.131, 131,9, 129.129, 129,126,8,8,8,8,0,8,8,8,8,9.9 

,8,8,9.8.8,0,8,8,8,9,8.9 

3212 'KEILLEUR XORE 

3213 WTR59.29. 123,71,59.21.123. 194, 56, 3. 58, 28- 123.281 
5213 'MESSflCE; 

3229 09TB67, 128. 63, 129. 83, 129.93.128,69.129.43,128.66.129,92,128,73.128,91,129,8 

3.128.69.129.33,8 

3222 0RTF42, 42, 42, 42, 42, 42,42,42, 42, 42, 42. 42, 42, 42, 42, 42,42, 42, 8 

5224 £)flTR84, 53,80. 69,90.123.63, 7?. 94, 69, 92, 128, 90, 79, 95, 92. 128, 67, 79. 77. 77, 69, 79 

,67,69,92,0,8,9,0,8,8.8,8,9.9,8,9.8,8,9,8.8.0,9,8,0,0,8,9,8.3,8,0,8 

3226 0RTR83, 67. 49,82, 63, 129, 61 ,128, 49, 49, 128. 128, 128,129,129,77,69.73.76.76.69.8 

5.92,129,93.67,49,92,69,129,61,129,48,48,8,9,8 

5238 0flTRW,63, 92. 34, 73, 69, 129, 129-84, 69, 92, 77, 73. 78. 69. 69, 8. 64. 33, 57, 49. 33. 32.1 

28.70,32,63.84,63,82.69.129.74,69.63,79,43.77,63.92,67.8.8.9.8.0,8.0,8,8,8,0.9 

3239 '0RWNI58TI0N OU JEU 

3248 &HTR39, 9, 123. 69, 58, 9. 123,234,2,32.7,62,8,38,1,123,24,63,234,3,32.7,62,6,58, 

2. 123, 24,34, 234, 4, 32, 17.62, 13. 30. 1. 123. 62. IS, 38, 2. 123, 62, 2, 38, 16. 123. 24.33,33. 73 

,122, 17,46,68.283.238. 128,33,233, 121. 17,83,61.283,239, 129.283.43,9,254. 13,32,249 

3242 ORTft62,0,»,28, 123,193.38.117, 1,8,239,293,96,6,281,8.8 

9889 PRINT"- UNE PRRTJE CtWQRTE 4 URNCMES. " PRINT"- KWS CH80UE PWNChE , IL FffJ 

T CRSSE* 60 9RIWJES. "PRINT"- LES 3 PREMIERES IflNCHES SE FONT RVEC \ 9WLLE ET ft 

VITESSE PROGRESSIVE." RRIMT-- LA 4 EPE PRNCHE UTILISE 2 8RJ.LES 1 VITESSE L 

ENTE.- 

9818 PRINT"- l£ t>EPL8C£MENT DC3 RRQUETTES 3E FRIT RVEC <-- ET — > ." RETURN ■ 



SOLUTION DE 
LHIPPOREBUS: 



10 FDR 1=1 TO 12 

20 READ y. 

30 PRINT CHR*(X) 

40 NEXT I 

50 END 

60 DATA B0,fc5,82. 73, 
B4, 89, 32, 67, 
72,69,67,73 




HEBDOGICIEL 27, rue du Gal-FOY 75008 PARIS 

VOUS POUVEZ VOUS ABONNER AU TARIF PREFERENTIEL DE 340 FRANCS POUR 52 NUMEROS AU LIEU DE 
52 x 8,00 = 416 FRANCS. ABONNEMENT POUR 6 MOIS : 180 FRANCS. 



NOM: 
PRENOM : 
ADRESSE : 
REGLEMENT JOINT: 



MATERIEL UTILISE : 
CONSOLE : 
PERIPHERIQUES : 



□ CHEQUE 



dccp 



ZX MONOPOL 



Vous revez de devenir proprietaire 9 Rren de plus sim- 
ple avec ce programme qui vous permet de speculer, 
acheter. vendre sans le moindre complexe (et des ris- 
ques minimum; les agents du fisc seront loin...) 
Boris investissements! 
Mode d'emploi dans le programme. 

Fabrice MARCOULT 




l* 27 jutflet. un numtro 


quadruple pour )• prtx d* 3 


numtros. 4 pfoywnmw 


par onKnatour. 64 peg**! 


24 franc* erwz voir* rnar- 


chand d« joornsu* 



ZX81 



:: e-. - Iob : [WfiRStI 



-:;•.£ 



CAfwcTcnes 



*0S . . . ; ■ •-:■■:- ;.„.., ;c2*j.}t. . . 

: I 
LM, . . CMflMCe 

rnxe . . . imbi 

:;; . . IHPOTS. . .PARC. - . ;a888i 

. : I 3 t 
j}i. . . INITIALISATION 
55... . . £ 
553. . . 3 551 ... J. 




*- «K ••••POUD 2X81 54K.04.4i 
58 REM MMNT IS TflPeS CE PSQSft 

me _--»e; les instructions suiu 
ss ae« euis apses auoib tape 

-£ =>RC5AA-- ■£ FftlTeS ^DTO .) £T R _- 
SITBCZ ,_ES -J0^5 = E5 S_j : J a^- % . SERu e C EU- 
EZ-WOUS Oil LISTING 

S3 »e- .icjc 1383 Lszis ssae 
«ee<a :»w acae sae :aea 

* 1633 17533 35*8 8333 13 

«3 .;;:; 2S33 i3ees ;;.■; 

_ 5* At" 7533 3d3 12333 2333 433 

3 1A33 13333 2533 iZZ 13 

38 28333 53C8 7333 1333 53 

88 -.33 

55 AE*1 3333 483 16333 2333 158 

88 2683 13323 233Z 13333 
2533 11338 13838 

sa ic-rc asaa 

59 =£- -A:sT = r-,A>,T TAOEZ -E5 " E 

*TJ3 E' _*S >:.*FSES S-:.»N-5 
ABORD LE ~*<TE 5IJI5 w- 30MME 

63 A£i i-E-.;E =CL= l^RESSE -28 

•8 1-1-.1Z -; _ 2 1R0I3ES 188 

8« rRRIS L>E SCClRHITE -IS 

C3i :;.;:=•. i= !>,;,! 53? 

3 -IS-hISJ S-PPQfiTCNT. 1S3 

83 EXES 5E ylTCSjE . -IS 
88 

52 BQTO 8868 

63 OEM ENCORE iuELCuES NOFIOBCS 

-- : -5- -; = -:•.« 

64 ;e- 3S1383 331483 131333 

172233 212633 353233 

351336 391488 131688 

1722eS 212636 253236 

-18413 838813 371S13 

111613 282S13 

65 REM 243213 3S131B 391418 

131316 172213 212616 

66 »0« 2»1 TO 23 
87 INPUT N8(Z) 

68 PRINT ■% Z 

69 NEXT Z 

73 ae*« hr-ntcnant sjous pouuez 
-AnCEA _E = = CiS«-'v!E ^AB GOTO 98 
''S STOP 
98 CLS 



14* POINT AT 28.8.RitJ) 

145 PRINT AT v,j| .x(JI,JtIJl 

158 RETURN 

288 "OR N.8 TO 77 

218 PRINT ZXMONOPOL". 

228 NEXT •, 

325 ABUSE 4£4 

253 ;ls 

388 PRINT OT 8.8, "ZXMQNuRCL 

385 PRINT ■ C£ JEU CONSISTE R FA 
IRE FORTUNE EN ACHETANT DES TERR 
RINS POUR PCRCCUOIR L.E LOY£R 



6S3 ir 

582 IF 

6S5 IF 

783 CL5 



... THEN GOTO 312 
STOP '■ THEN STOP 

"" IEN GOTO 9983 



263 SOTO 643 



ENTPEZ LE NUHERO &U 
i ERRRIN" 

4525 input z 

4526 IF z<i OR Z.23 THEN GOTO 4S 



i = : ■ c =s:n: 



: :i . 



POuR RCmETE 



Et FftIT LE BlLfiN DE Lh PRRTI 

"320 PRINT 1 

:.; ^ERMETT;... . 
. FRuT CECOUWRIR CELUI-CI 

338 PRINT "IL V R RU MRXIMUN 4 
JO'JEURS.LES juuE'JRS £TRNT SYMBOL 



._ F0IS.8 

iZC -;exT J 

881 IF J>UOUCUR TMEN lET jjj-1 

eie next o 

312 CLS 

813 PRINT " LP. PRRTIE EST FInIE 
.U0ULEZ-'JC.:5 COntinuER'*" 

314 Input o« 

f IS IF Ol^Jiul" THEN GOTO 838 

816 REtt SBQE 

323 CLS 

833 PRINT RT 8,8, "SILRN" 

848 FOR U«l TO JOUEUR 

358 FOR Z.l TO 23 

3S5 IF URL B*IZ,28 TO 29j sW TME 
N LET R»(U.8 TO 281 -5TR« IIURL 8 
StZ.l TO 18'JtlUAL RiCy.8 TO 28) 

368 NEXT Z 

865 PRINT "LE JOUCUR 1 

RGNE iCMME " 

367 PRINT A«iU> 

373 NEXT U 

e?5 PRINT RT 21,8," 

RTie?" 

976 INPUT P* 

877 IF Pi«"i5ul" THEN GOTO 98 



a,ft;Bajz] 

548 PRINT RT ."- ' 

CONTZNUEA 

§ 15 fQR_Z=l TO 28 



2.8,8*^, 
21.8. "TRPEZ i 



4S4i ■.£.■■ _ 

45S8 IF INKtVt»~~ TnEN GOTO 4558 

4S63 IF INKEY!-"^ TnEN GOTO 452 

4.573 GOSUB 133 

4568 GOTO r-" 

4938 REM ~ 

5888 CLS 

sei^pRiNT tab i 

581S PRINT vOTRE COmPTE En 

' * ELEUE_R_; L a«(J.8 TO 28) 



VtJi>8 TnEN GOTO 7338 

iJiC C CR 1-1 TO 23 

8858 IF yiji.uRl NfiZ.S TO 6' RN 
O XtJItURL NtlZ.l TO 2) RN& XIJ1 

(URL N«.Z.3 TO 4. ThEn GOTO 7:»* 

5jii \£y.T z 

5878 PRINT RT 23.8.R8IJI 

tt5C l"j_j«_ 

6698 REM <«*<*m 

7888 CLS 

~i:i =o*nt The 9. ■■Chrnce ■ 

7815 orjnt TRB }. *— ^* 

^■323 _£- ZaZNT (RNO«S) .1 

7833 PRINT C»iZ> 



'RCMRT'-.RT 1.8, 



5315 GO-0 5588 

5323 CRINT "ENTREZ lE NUMERG OU 

TERRRIN" 

5838 INPUT I 



5335 
5843 

5353 
5233 



THEN GOTO 



"ONE RUTRE PR 



IM I BI rl F 



i:-;-=i 42 

95 30- 283 
188 ClS 

183 -■-- jumm 

Ijf aa-.s' S' 3.8. 




JO'JEURS.LES jOuEUBS 

ises prp b § s a. 

343 PRINT RT 21 .8. " 
MBRE OE JOuEuRS." 

358 INPUT JOUEUR 

368 IF j.: _E.=. -■ '. OR 
N GOTO 353 

378 PRIFJT RT 23.8, 
XIMATIueHCHT LE 
;^". ^£5IPE3. 

:bc inpu- ^_.-ee 

382 REM "~ J 

335 LET 

3*0 CLS 

513 OIM r I JOUEUR* 

515 DIM h«>4.28> 

523 DIM / (JOueUHl 

521 POO 3=1 TO 23 

5ie LET e».Z-23 TO 29i ■"«" 

523 NE/T Z 

525 FOR 2-1 TO JOUEUR 

S25 LET -.''ZJ s3 

527 LET <iZ>*8 

528 NExT 2 
533 FOR Z»l TO 4 

548 LET R*.Zi= RBGENT 58888.383 

3c^3^3C3.-,'.. ■■■ ■ ■ ■■-■■:^J^^^3^^■3 ■ 
558 N 



515 lOSufi 1308 

615 iOSuB 188 

618 PRINT AT 28.8,Rt(J) 

553 IF j>jGu£UP THEN LET OU 

637 IF FOISsl THEN GOTO 643 

638 GO sue 5888 

648 PRINT AT 21.8."J0ueuR N" 



1838 LET X(J 

1848 IF XI J) 

1858 IF Y1J) 
NTREZ LE NO 1128 RETURN 

2838 LET X(Jl=INT ;RNDf28i 

2818 LET Y(J] «3 
0UEUR>4 TME 2828 GOTO 1858 

2838 LET XIJl.INT (RN0«12! 
NTREZ RPPrJO 2343 let y(j)«Y(u).6 

NGMSRE DE T 2858 G0TG1353 
2398 REM !*""" 
3388 CL5 
3838 PRINT AT 8 ,8, "BANOUC " . 



3848 PRINT ''N" . J. " 

3858 FOR Z»I TO 23 

3868 IF UAL B«<Z,26 TO 29) 

N PRINT 'N-,2,- ■ i .Bi<Z) 

3373 NEXT Z 

3875 PAUSE 4E4 

3378 CLS 

3888 G0SU8 133 

3898 GOTO ' ' 

3898 REM ■ 

4888 CLS 

4818 PRINT RT 



. AflJI 



8.3. "BOURSE" 



5365 GOTO 5338 

5878 LET R*.j.8 TO 231 -STRt (VflL 
lAHJ.S T(J 23Il-t(UAL .B«lNU.4 

5138 LET B»>NU,2S TO 29) »STR« j 
5118 PRINT Bt'NUi 
5128 GOTO 5218 

!? C ?t P S 1N I AT 21.8, LE TERRAIN £ 
ST DEuA ueNDU" 
5218 PAUSE 4E4 
5223 G0SU8 133 
ZZ22 ;0TO 648 

5248 PRINT AT 21,8. "UOuS N AuEZ 
RAJ -tSEZ D ARGENT" 
5253 GOTO 5218 

5333 IF XUliUAL (N8INU.1 TO 2> 1 
AND XIU1IUAL 'NilNU.3 TO 4)) TH 
EN GOTO 5378 

5313 PRINT "LE TERRRIN Ou£ UOUS 
UOULEZ ACMETER.N EST OAS CELUl 
U UOUS UOuS TR0UUE2." 
5323 GOTO 5213 
5488 STOP 

5S83 FOR Z«l TO 23 

5518 If UAL N|(Z 3 TO 6)-YU> An 
O X<J)>UAL NJiZ.i TO 2) RNO X (U> 
12,3 TO 41 TMCN PRINT "UO 
> 3UR LE TERRAIN NUMERO °; 
TO 2) , " PRIX ",B»i2,3 TO 



<uAl n| 



8«(Z. 



5S12 IF ' 



* i2,3 TO 6) -Y (Jl AN 
'2.1 TO 2 1 AND X IJ) 

4» THEN GOTO 5828 



l GOTO 483 

4858 IF R«2 THEN GOTO 4588 

4868 CLS 

4373^RINT^T 8,8. "BOURSE", AT 1, 

4888 FOR 2.1 TO 23 

4898 SCROLL 

4188 PRINT B«12,1 TO 31) 

4118 SCROLL 

4128 PRINT Btl2,33 TO 1 



O 5 823 

' UAUWMMf 
Fols.l 



UAL 
._. )URL Nt 
<URL N« 12.3 Tl 
3515 NEXT Z 
5328 SOTO 
630r — 
6381 _. 

6818 IF x<J)>16 AND X(J)<22 AnO 
YCJI»13 TMCN LET AfU,8 TO 28) «3 
TR» I (UAL A»iJ.3 TO 2811-1388) 

6812 FOR 2*1 TO UOUCuR 

6813 IF INT ,RND.2)4l-l RND Y1Z. 
• 3 AND D>3 AND X IZ> <23 AND X 1 2) > 
■8 THEN LET A«(Z,B TO 28) "STRt i 
■'JAL Al.Z.8 TO 28)>*23383l 

531S NEXT Z 

6823 IF X(0) >-8 ANO X ( J) < -5 ANO 
^(J)«18 TMCN LCT -l ■-_.:• TO 39) «S 
TRf ([UAL A»<J.e TO 2311-28888) 
6338 IF X(J1>>8 AND ■."'■¥ RND 



L A«>, 
33) 



lUflL Cf(Z,91 T 



7353 G0TC648 
7183 P.EH HKB 

7iia if jswCnst ■: 



-.(2.28 TO 29) OR 
JAL 8*i2,2S TO 29i »8 ThEn GOTO 7 

7128 CLS 

7133 POINT TAB 3. ' LOYCR " 

7135 PRINT TAB 8,-™^^'* 

7148 PRINT " LE uOuEuR N . J, 001 

T '■.B».2,*3 TO : . » 

7158 PRINT "AU POSSCSSEUR OU TCR 

RAIN N".2. C EST A OIRE Au 

JOUEUR N-.6tiZ.28 TO 29 i 

7168 LET At. j 6 TO 28>»STflt UVfl 

L A«U.S TO 28)>-(UAl 5t(Z.«B TO 

7178 LET AtHUAL 8flZ.2B TO 29)1 

,8 TO 281 ■STR« iiuAL Alt (UAL Bf ( 

2.23 TO 29) l .8 TO 28) * (URL B«(2. 

48 TO ) ) l) 

7138 PRINT AT 28.8. "LC PRElCUEME 

NT DE LA SOMNE S EFFECTUE A 

UTOMATIOuEMCnT.' 

7198 PAUSE 4E4 

7195 GOSUB 188 

7^33 GOTO 7858 

3993 STOP 

9333 FOR 2«1 TO 23 

9385 LET 8812.1 TO 31 «STS« | 

-318 INPI " " 

8S3 LET 

IENT A I. 

9338 LCT 8«tZ,33 TO 391 •LOVER " 
9843 INPUT BUZ. 48 TO 1 
9345 PRINT BtiZi 
9353 GOTO 68 
9368 FOR 2*1 TO 6 
9362 Input ci til 
9863 PRINT C«iZ> 

9364 NEXT 2 

9365 GOTO 63 
9133 STOP 
9988 CLS 

9913 PRINT "SALUT.CA UA COmmE Tu 
UEUX. J ESPERE OuE Tu GAGn 
ES... ALORS ON UEUT TRICM 

ER CE N EST PAS BICN MAIS JE WA 
IS TOUT OC MCMC T AIDER." 
9928 PRINT ' ENTRE lE NU OU JOUCU 
R OUE TU UCUX PCnAlISER' 
9933 INPUT REnA 

9945 IF PCNR<1 OR PENA)JOUEuR "h 
EN GOTO 9930 
3946 PRINT "N" . RENA 

^953 PRINT "LA SOHME OUE TU UCUX 
RETIRER OC SON COMPTC EN BAN8UC 

9963 INPUT 50MME 

9978 LET AttPENA.8 TO 28)«5TRi i 

•UAL A11PENA.8 To 23i'-S0MME) 

9988 PRINT "C POUR CONTlNUCR" 

9998 IF iNKEv*.' THEN GOTO 9998 

9991 IF INKEY«» C" THEN GOTO 990 
3 

9993 GOTO 4253 

9994 SAUE "2XMON0POII" 

9995 GOTO 98 



TAROT 



joueur n° 2, touche: B. affichage: PTS2. 

joueur n° 3. touche: C. affichage PTS3. 

joueur n° 4. touche: D. affichage PTS4. 

joueur n* 5, touche: E, affichage PTS5 
Repeter ces appuis autant de fois que necessaire. 
Etape 4: 
Pouf une nouvelle partie reprendre a I'etape 2. 



Ce programme pour HP 41 C. sans module d'extension, 
utilise 49 registres de programmation et 1 2 registres de 
donnees. rassurez-vous, il ne joue pas au tarot, il se 
contente d'assurer toutes les operations concernant la 
marque des points a ce jeu. suivant les regies de la 
Federation Francaise de Tarot, et ce. que le nombre 
de joueur soil 3, 4 ou 5. 

Remi LANNE 

Mode d emploi 
Etape l: 

- Initialisation, touches XEO TAROT. affichage No de joueurs? 

- Entree du nombre de joueurs N. touches: 3 EN E5.R/S, affi- 
chage: OK. 

Etape 2 Operation a repeter pour chaque tour |0u6: 

- Demarrer les operations, touches F, affichage: PRENEUR"> 

- Entrer numero du preneur (chaque ioueur a un numero de 1 a NJ. 
touches: X.R/S. 

- Si on joue a 5: joueur appeie. touches xa,R/S. affichage: APPLE- 
LAhTH 

■ Si on joue a 3 ou 4: nen. touches: xa.R/S. affichage: P:l G:2 S:3 
C:4. 

- Contrat demande: 1 — petrte. 2 — garde. 3 — garde sans 4 — 
garde comre. Touches C. R.S Affichage: FAITE OE? 

- Points realises en plus du conlral (negatif si chute). Touches (- 
)P.R/S Affichage: 1 AU BOUT? 

■ Si un joueur a mene le petit au bout, taper son numero. sinon 
R/S.Touches: (Nj.R/S Affichage CH DEMANDE? 

• Si un chetem a ete demande par le preneur. taper 1, sinon R/S 
Touches: (1).R/S. Affichage: CH.FAIT? 

- Si le preneur a realise un chetem. taper 1, sinon R/S. Touches 
(1J.R/S. Affichage: POIGNEE? 

- Entrer le numero des poignees (1: simple, 2: double, 3: triple) a 
chaque fois que la question esl posee. (quel que soil le joueur la 
presemantJ.Touches: (PO). R/S.Affichage: POIGNEE? 

- Lorsque toutes les feventuelles) poignees sont entrees, la calcula- 
trice affiche le nombre de points (cumules) du preneur Affichage: 

Etape 3: 

- Visualisation des scores: 

joueur n" 1 . touche: A, affichage PTSt. 



28:36 83. 82 
8l«Lei -TQRfjT- 

82 CLRC 

83 FIX 8 

84 CF 29 
K SF 27 

86 -Nt) lie JOUEURS V 

87 PBOKPT 

88 STO 88 
M CF 87 

18 S 

11 X=Y? 

12 SF 87 

13 -OC 

14 PUfJflPT 
I5»IBI (I 

16 RCL 81 

17 STOP 
18«L8L B 

19 RCl 82 
28 STOP 
21»L8L C 

22 RCl 83 

23 STOP 
24«lBl D 

25 RCl 84 

26 STOP 
27«lBl E 

28 RCl 85 

29 STOP 
3»«18L F 



31 -PRENEUR ?■ 

32 PROMPT 

33 STO 86 

34 5 

35 FC 87 

36 CTO 81 

37 -APPELANT V 

38 PROtlPT 
39»LBl 81 
48 STO 87 

41 -P'l G:2 S:3 C:4 

42 PRtWPT 

43 3 

44 JOY? 

45 CTO 82 

46 RtH 

47 1 

48 - 

49 2 
58 • 
51 RT 
52»l6l 82 

53 RDN 

54 STO 88 

55 -FBITE HE ?■ 

56 PROHPT 

57 EKTERt 

58 SIGH 

59 RCl X 
68 2 

61 / 

18 



62 ST* 2 

63 RUN 

64 STO 18 

65 25 

66 • 

67 XOY 

68 INT 

69 • 

78 STO 89 

71 8 

72 -1 OU BOUT ■>■ 

73 PROtlPT 

74 X=8? 

75 CTO 83 

76 CF 85 

77 RCl 86 

78 X=Y? 

79 SF 85 

88 RDN 

81 RCl 87 

82 X=Y? 

83 SF 85 

84 18 

85 FC? 85 

86 CHS 

87 STf 89 
88<LBL 83 

89 RCL 88 
98 ST» 89 

91 CF 85 

92 CF 86 



TOUS LES L1VRES en ft-ancais anglais ou 
espagnol pour la HP-41C/CV/CX, dont, 
enfin en Francals. La PROGRAMS ATION 
SYNTHETIQUE de la H P-41 , par WC Wic 
kes (franco : TOOF). Egalement Manuel 
du tailleur et polisseur de verrea 
d'optique (franco 150F), dictionnaire du 
petit offset" (franco 1S0F)... Catalogue 
gratuit, vente par correspondance. Edi- 
tions du Cagire, 77 rue du Cagire, 31100 
Toulouse. 



HP 41 



Le 27 julllet, un numero 
qu*dnjple pour te prti de 3 
numero*. 4 programme* 
per ordlneteur, M peg**! 
24 franc* ehez votr* mar- 
chand d* lournaui. 



93 8 

94 -CH. 1EWINBE V 

95 PROHPT 

96 X«8? 

97 SF 85 

98 8 

99 -CH. FHIT ?• 
188 PROHPT 

181 X»8? 

182 SF 86 

183 8 

184 FS' 85 

185 288 

186 FC? 86 

1 87 CHS 

188 FS? 86 

189 288 
H8 FS? 86 
111 ♦ 



112 SH 89 
I IMBI 84 
H4 8 

115 -POICHEE 

1 16 PROHPT 

117 X=8? 

118 CTO 85 

119 I 
128 • 

121 18 

122 • 

123 RCl 18 

124 • 

125 ST« 89 

126 CTO 84 
I77*LBL 85 

128 RCL 89 

129 ENTER' 
138 FS? 87 



131 » 

132 ST- 81 

133 ST- 82 

134 ST- 83 

135 ST- 84 

136 ST- 85 

137 RCl 89 

138 FS? 87 

139 5 

148 FC? 87 

141 RCl 88 

142 • 

143 ST* INI 86 

144 STt IHD 87 

145 RCl INI 86 

146 STOP 

147 CTO 8 

148 ENI 



MOTO 2000 



Vous dies deux et vous devez vous deplacer le plus 
longtemps possible dans un labyrinthe sans sortir des 
limrtes et sans jamais repasser au meme endroit. Pas 
facile! 



Monsieur HENRIET 




«=« Goua "we 

M DlfWt2) R" 1-8 R'U-8 

t5)-«i.'(6)-«-i;l7)-B ..rSJ-2 

m C0L«..4.t!CLS 

38 ft»X-lt08 -i!(XJ-8:*<5<T ; PRINT 

iM-:r«x-i7037-p«:M-a>'; nwt -psihi-s 
1 " 

•08 PR1nT'B--FORX-1TQ3?:PR!H1"8I "^NEXT: 

«»irii-ei ■ 

»2B PR(Nl-i--Ft»>-II037^PRlNI'8l "1-NEXI- 

PRim'BI ■ 

13* PRINT'S' -FORX- I I03?-P«IHI-B1 ;-MCXT: 

p»:m-8i ' 

MB PRINT'S' :F0RX-II037:PRINT-B1 " 1 "NEXT : 

PR1NI-8I " 

<S8 PRINT -I" FQRJel TQ37 :PRINT'BI - I 'NEXT i 

<ea PRINT'S' Fr7RX-1T03?:PRlNT'B|-; NEXT: 

MINI'S' " 

■78 P«IHT*B--FO«OI-n037:F«INT-ei-i:MeXI: 

pRim-ei * 

'88 PR J NT'S" -*■£»>■ 1 1037 :PRINT '81 * ; :MEXT : 

PRINT'S! ' 

198 PRJNI-»--F0ftX-ITO3?:PRINT'B1-;:NEXT: 

PR!NT*8I 

788 PRINT'l' ;fORX-t 1037-PRINT'ai" i 'NEXT : 

pRINT'81 ' 

218 PRINT '■' :F0«O«'>lI037;PRIP'I*81-;:f«XI- 

PR1NT-8I- 

228 PRINI'1-.F0R*-II03?=PRINT-81';:NEXT: 

PRINT'61 ' 

238 PRIr«T-B--FDSX-!r037-P«lNT'Bl-;:N£XT: 

PRINT 'at' 

24« P«l«l-*--F0«X-II037-P«INT-81*;-NeXT; 

"91MI-81 ■ 

258 PRlMl-f-:fORX-II037-PKINT-81-;-MEXT: 

"RInT'81 ■ 

268 P«tlNI-i-^FO«»-1I037-P«tlHT-ei-;:Nexr; 

"RINT'81 " 

278 pf*INr-8- F0RX'n037:F«lt*T'81-;:NeXT: 

»rint-bi ■ 

288 P«lMl-8--F0«Jc=IID37:PtlIHTer;:WXI: 

mjiht-81 ■ 

298 PWIHH3,8]'i -;t«i" -;R(I>;' 

iB*,- -;R(2) 

388 Dimt2)-T[t]^3S:T(2)>S«e:P0Kt5529»» 

1(1), 168: F0KE53218*ICI),BI :PCK£55296*tt 

2)-tS2:P0ltES3248TT(2),Sl 

318 GtIG»:IFG*---IHEw3ia 

328 F0RX-5T0BSIEP-I -PO«(E573^8,X:PaKE5735 

2, I :mEXT 

TM IFG»--|-TmENG0TO42B 

34B IFG«»-?-THEHG0T0528 

358 IFGS--3-GOT062B 

368 IFGa--4'60T072a 

378 JFG*=-8-GOI082B 

388 IFG*-'B'GOTO3?0 

138 IFG»--8-GOI0t828 

«88 IFG*='B'GOTOII28 

418 GOTO3I0 

478 P0KE55736frt1J, l68:f»-81 P0KE53248*T 
(|).E0:U(2J-au(3J-B:UH)-B:Ut I 1*1 

' «3B IFPEFJCCS3Z4e*I<n-4e)-BTnENG0SUB 123 



448 !FPEEHt53218tTU)-«ai-67tn£M30SLia 12 

•m 

458 P0KE5S236tIiI l, 16.P0KE5324B'TC I ).07' 

T(t Wt 1)-48.P0*E55236»TU).I6B:P0><E5324 

6-1(1). CO 

468 GETGt: IFGtO' THEMS0T033B 

4?8 IFUC51-1THENGOT0S28 

498 !FLC61*ITKENGOT0328 

»98 lFUt7)*UnEr'GOT0182a 

588 IFuCBI-ITmENGOTOI I 28 

518 GOT0428 

528 POttE5S296 T r(l).l68 :£0»83:P0KE53 

248* HI ).E0 OC2)-l -UC3)-B:iJC4)»0:OCI >»8 

538 JFPEEKCS324BtT[ n.4B)*8Tn£nG0SUB 123 

B 

540 IFPEEKC5324BtTt n*48J-67TK€WG0SU8 12 

98 

55e P0KES5236--CU. 16 :<*CKES3249'TC I 1 ,67-- 

T U>-HU'4e:P0KE55236*Tni,l6B:PCK£S324 

8»rcn.E0 

568 GETG«:IrG*O' , Tnet«G0TD33B 

578 IFUCS)-! IHENGOT0e28 

580 IFUC6J-MTM£r*C070928 

598 :FUt?J-llMEnG0T0182B 

608 iFU(8)=!TH£«G0T0l I2B 

610 G0ID528 

620 P0KE55236-.Ttn.!6a:f0»82-PC»:ES324B'T 

tl), E0:UC2)-8.U(3]-1 :uC4J-B:UCl)-B 

630 IFPEEKtS3248-Itn-l ) -0THENGOSU0 1238 

640 IFPEFj((53248-ICn'l)-67rMEMG0SUB 123 



650 P0KES5236-UI),I6--PC¥E53248*TC I ) ■ 67 : 

UD-TCIJ-1 -P0KESS23etTU J, 1 68 :P0KE5324B 

-KU.EO 

660 GErG*;IFG*O'"TMEHG0rD33B 

678 IFLKSJ-ITMENG0T0B28 

608 IFUl6J-ITnEnGOT032e 

690 IFUl?)-1TpENGOT0IB28 

708 IFU[8J-lTHEf<C0T01 I2» 

210 GOI062B 

728 PQKE5S236-TCI), I6B :E0-84 -P0KE53248- 

T(l J,EO!Ut2J-8:U(3)-0:UC4)-l :UCl)-8 

738 IFPEEK(53248-fTC1)*n-BrM£NG0SUB 1298 

740 IFPE£Kt53218-T(n<1)-67TH£hG0SU8 123 



750 P0KE55296-K1 ), 16 :P0KE53248'I( 1 J. 87 = 

TCI J-UI )'l :P0KE55236*rt1 ). I SB :P0KE53248 

•TCn.EO 

768 GETG«:IFG«O' ,, TMEnG0T0338 

778 IFUCS)-! THENGOT0828 

788 IFUC6)»ITM£NG0T032B 

730 IFU(7)-ITHFNG0TDI82B 

888 IFU(8)-ITMEHG0T0I I 2B 

B10 G0T0728 

828 P0KE55236*rC2J,152:E0-8l =P0KE53248»t 

C2](EQ'U(5l*l ;u(6)»8;iJC?)-8 : UC8]-0 

830 !FPEEK(5324BfTC2)-48)-erMENG0SUe 122 

840 IFP£EK(53248»TC2)-iaj-e7IHEMG0Sue 12 

20 

850 P0KE55236-T(2),32:P0KES324B*I(2),B7: 

rC2)-T(2)-48;POKE55296*rc2).IS2 : P0KE5 

324B»T(2).E0 

860 GETG4- IFG*<>-'TM£M330 

870 IFUC1 )»llHEN428 

888 JFUC2J-ITMEN528 




89B IFl;<3J-lTKN62a<I 

988 IFUt4)-ITh£M72B 

918 GOTO 82B 

328 P0KES5236*T(2J. I 32 J E0»83 -POKES 3248 

•U2),E0:ut5)<8-tJ(S)-t :UC7]-B:UfS}-0 

938 1FPEEKC5324B'TC2)»40)*BTMENGOSU8 122 

a 

340 IFPEEKC5324BTI^2JT48)-67IME^GOSlJB 12 

28 

95B P0K£55236*It2),32:P0KE53248''TC2),67: 

■C21-Tt2J T 48;P0KE5523e»Tt2J,152:P0KE5324 

B»H2J,Ea 

966 GETG«:IfG40- 'ThEN338 

978 1FUC1 )-!TH£>428 

98B IFUC2J-II«>528 

938 IFUC3J-1IMEH62B 

1008 IFUC4J-IIHEN728 

1018 GOTO 328 

1828 POKE55236*U2),!52;EO=83:P0K£5324e» 

TC2J,EQ:UC5J-0:UC6D-8:UC7J-l:UCB]-8 

1038 ]FP££K£S3248''TC25-n-8ThenG0SL'B 122 

B 

1840 ]FP£EKC53248iTC21-l)-67TM£WS0Slje 12 

28 

1B50 POKE55236'TC2),32 :POKE53248tTC2).B 

7:TC2J-Tt2)-1-PC»<E5523«Tlt2J,l52:P0»CES32 

4B'TC2J,E0 

1068 GETG*:1FG*0" TWEH338 

1878 IFUUJ-ITMEW42B 

1080 IFUC2)-1TMEN52B 

1030 IFUC3J')THEM620 

I IBB 1FUC4XTMEN72B 
1110 GOTO 1828 

1128 fW£S5236»T(2),152:E0>S4:PaK£:i324B» 
TC2),£0;UCS)>8:UC6]-B:UC7J-8.- i J[8]-1 
'138 lFPEEK[53248tTC2]»1)-8TM£NG0Sl)e 122 



1140 IFPEEK(S3248»T(2)*])-67THENG0SU8 12 
28 

I I 58 POKE5S236* T ( 2 ) , 32 .""0KE53248* I (21,67 
)T<2)>fL2]-r| :P0K£SS236»Tt2).l52:P0KE5374 
B+TC2J,E0 

1160 GETG*-IFG«<> r 'TMEM33B 

'178 lFU(1)■^^«^4^e 

t 188 ifUC2)-lTn£N520 

1 198 IFUC3)-1TH£N62a 

1209 IFUC4)-1IHEH72B 

1218 GOTO I 178 

1228 fORX-1 TOlB 

1238 FORS-XTOBSIEP-I P0KE57348.S ;P0KE573 

52,1 

1248 PDKE55236.Tt2),ll2:POKES3248tI(2J.8 




1368 P5INT-8CE 


JEU SC JOLiE f> DEUX * 


•378 PV1NI-B.ES TOUCKS DU COKtW SO 


NT * OTKIGER- 




'388 PVlftl-L* 


©TO OE D90ITE' 


'338 PSINT-BLES TOUCKS 1.2.3.4 SERvtfT 


« D18IGER til' 




1408 PRIMT-IPC 


'0 DE G«uCNC 


'418 P«lNT'8Be 






1438 pftlNT-BBE 




1440 PSINT'IK 




1458 INPUT-MOP 


OU JDUEUR f> G*Xt*. •'.!• 


'468 INPUT-NOP 


OU JOUEUR « OROITE " :Bt 


147B FMX-ITO! 


t: NEXT -»£ TURN 


1488 C0LW..2. 


rtCLs.rniw-mmmmmmmm 


1498 PSINT 


C8E3 F5C8 F5CSC8C8E9 C8 


CSC8C8CB F5C8C8C8C9 


'S88 P«lNT- 


cacB cece cb cs cs 


C8 C8 




'510 PR1NT- 


ce c« C8 ca cs cs 


C6 C8 




'528 pttlNT' 


C6 CS C8 C8 C8 


Cfl C8- 




'538 PKlNT- 


C8 CB FE£8Cec8C3 CB 


FEC8CSC8C3 




'548 f«X-1T07 


-PRINT" -NEXT 


15S8 peiNT- 


FSC8C8C6E3 F5C8C8C8E9 


F5C8C8CBE3 


5C6CeC8E3 


'568 PRINT* 


FE F5C3 C* CS CS 


C8 C8 C8 




'STB PRINI- 


F5C9 CB C8 CB 


C8 C8 C8' 




1588 PRINT" 


FSC9 CB CB CB 


CB C8 C8 




1598 PR INI " 


F3CBC8CBCB FECBCBC8C9 


FEC8C6C8C3 


EC8C8C 8C9 



5:FORC-IT01B:n£XI.- 



1258 NEXT^NEXT 



P0KES3248tt(2). 1 



1591 n2«-'C3ABC3B8C3CBC308C3f3E5t3CXlflCl 

C8C388C3«e- nusicn?* fl34-*rtOC380CVOC300 

■:rH»-'OOC3E0" 

i&08 S*-'98989«909e9e3e9«9<»e39MW888e8 

Q989e989«98983e**0TRICE9«HeriRIET-^ORI-1T 

0LEN(S«);PRINT RIGHT«tS«.I) NEXT PHUSIC 

13« 

1601 FCWI-LEN'S«)I0I£TEP-1 PRINT RIGm 

T*(5«.i)=NEXI-nusicri44 

1618 RETURN 

OUS REFAIRC UNE PftHI IE (O/N)" 
'630 GET S»U» flt--N'GOT0 166B 
'640 IF M-*0 H G0TD6e 

1650 GOTO 1638 

1600 F0R?-II07.X-1*JNH[?)»«NtK I )).'R-1*I 

NT((7)iRNOU 11 ■ I'RINTtX.B] 

HB JflTBTBTB 70 787*7? 



'260 nUSIC-fl*: Rtl)-R(l)*! 


1678 PRINHR.O) 


BBS 


70 


?8 


7070787 


'278 IF R(I)->15THEN GOSUS 1628 


7 70 H 










'288 GOTO B8 


1688 PRINTIR.B) 


BOB 


7078 


78 


70 767 


1230 FOCX-1BT015 


877 28- 










1388 FOR5-XTD0STEP-I PCH-E57348, S :P0KE573 


1038 PRINKX.B) 


Bva 


70 


78 


7B 707 


52, 1 


87778- 










1318 P0KE5371B»K I 1 , 85 FORC-1 T0I8:NEXI :P 


176B PRINT I R. 81 


BBS 


79 


78 


78 70 


Ot<E53248»TU), IB?. NEXT -NEXT 


7878- 










1328 nuSlC*0";R(2)-*t(2)*l 


1718 NEX1 iCOt-OR 


.7,7 








'330 IFRC2J->15TNENG0SUS162B 












1340 G0T08B 












1350 COLOR. .7,2-CLS 













L'AS DU VOLANT 



Un bolide aux prises avec les pieges d'une route capri- 
cieuse, ou rapparition soudaine d'un camion qu'il faut 
eviter: du refiexe et de I'adresse, il vous en faudra pour 
parcourir sans accroc le plus grand nombre de kilome- 
tres possible. Celui qui aura accompli (e plus long trajet 
sans faillir plus de 2 fois, sera sacre As du volant. 
A vos commandes! Pret! Partez! 

Eric DORNE 

Determination du niveau. 

Vous aimez conduire "pepere*. "rapicte", "sooriir, ou "casse-cou"? 

Akxs chotsissez voire formute: 

Niveau 1: P6pere, niveau 2: Rapkte, niveau 3: SportiJ. niveau 4: 

Casse-cou. 

Des niveaux 1 a 3, la chaussee se fait de plus en plus etroite. Au 

niveau 4 eile est engloutie dans le brouillard. vous ne voyez plus. 

Vous laites apparaitre la chaussee de voire choix en appuyant res- 

pectivement sur les touches 1, 2. 3, 4 (EXE). 

Determination du trace de la route: 

En fonction du niveau chorsi. apoaraissent sur I'&cran deux flecbes 

verticales ( T ) Itmitant la laroeur de la route. 

Le trace de cette route se deptace de tacon aleatoire vers la gauche 

ou la droite de voire ecran, mais vous etes averti de ces "vlrages", 

quelques tractions de secondes avant leur apparition, par uno fleche 

horizontaJe -• ou — a gauche de I'ecran. vous indiquanl lo sens du 

virage. 

Le vehicule: 

Vous agissez ators sur votre bolide figure par une petile etoile en 

appuyant sur tes touches: 

J -* pour un virage a gauche ou " — pour un virage a droite, afm 

de ne pas aller dans te decor et poursuivre votre chemin. 

L'obstade: 

C'est un camion represente par le symbote X qui apparalt soudaine- 

ment et qu'il faut, bien sur. evrter. 

Vous oe pouvez agir sur lui mais vous etes averti de son arnvee par 

lapparition d'un potnt d'exdamatiofi a droite de lecran. 



Calcul du score: 

Les kilometres s'ajoutent aux kilometres 1 par 1 au fil du temps 

lorsqu'aucun element exceptionnel n'intervient. 

2 par 2 lorsque le camion apparait sur la chaussee. 

5 par 5 lorsqu'ils ont atteint les nombres 200-500-1200-1500-2200 

etc.a condition que le conducteur ne soit jamais alle dans le decor! 

Lapparition dun camion met fin a cet avanlage et ramene au sys- 

teme de comptage initial. 

Si vous allez dans le decor, plus de 2 fois. le 702 indique le kilome- 

trage que vous avez parcouru. Si celui-ci est superieur au record 

d6|a realise, vus etes autorise a inschre votre prdnom. 

Mais rassurez-vous: lorsque vous atteignez un kilometrage de 200- 

500-1200-1500-2200 etc... tous vos ecarts de la chaussee sont ou- 

blies et vous continuez a rouler! Par contre, lors dune collision avec 

un camion, vous reculez sous I'eftet du choc, de 10 km. 




* 



Suife de la page 1 



FX 702 P 



Lr 27 jidllet. un num*ro 
quadruple pour te prix de 3 
numeros. 4 progrimmai 
pnr ordlnnlrnr, 64 pag«a! 
24 trnncN chez votre mar- 
chand de Journaux. 



376 IFHE»=V;iFB 
-112:B=B-1:RET 

3S8 KT 

396 If BifMlEN(I)-! 

:60!0 458 
469 H=(FMC (P'Ie3) 

)<l£3:!FH;296: 

IFH428II6010 7 

28 
416 IFHi568IIF Hi5 

tlieOTO 728 
426 IF 8SA169T0 456 
438 IF M«""iIF B=R 

»LEK(t)-3;60IO 



658 
448 SET 
456«flir 5:II=".":P 

HI :01--"":S=8:« 

l=««t"l." 
4«8 FOR 2=1 TO 3 
476 PUT CSR 3; "DANS 

LE DECORS" 
488 PPT CSR 6:""!" 

1CSR 16;"!!!" 
498 HEXT 2 
588 MIT 18:PRT CSR 

8i"NISS":CSR 1 

2!MiPRT "WSi 



516 IF «t="t.l.t."; 

60TO 536 
528 RET 
538 i=" "P6RT1E TE 

RNINEE"" 
546 FOR 2=8 TO I9:P 

RT CSR 2;HID(2» 

l,l)!l«XT2 
556 MIT 38:PRT :PR 

T "KMS EFFECTUE 

S : "IP 
566 6S6 (H«28)»558: 

END 



576 IF P>JiPRT " RE 
CORO BflnO !!'! 
J--p:6S8 778: Et= 
Ct 

586 RET 

598 IF P«iPRT " RE 
CORD BRTtU !!*i 
K=P:6S8 778: Ft= 
Ct 

668 RET 

616 IF P>L;PRT " RE 
CORD 6BTIU !!": 
L=P:6SB 776:61= 
Ct 



626 RET 

638 IF PHlPRT " RE 

CORD 88TTU ( !": 

y=P:6S8 778: Tl= 

CI 
646 RET 
656 KBIT 5:S=6:Dt=" 

":P=P-ie:PRT 
668 PRT " CRRR8SHHH 

H II-! !!' 
678 FOR 2=1 TO 3 
688 PRT CSR 6i"RCCI 

DENT" 
698 PRT CSR 6:"'!!" 

;CSR I6:' MI " 
768 NEXT Z:I!=".":R 

ET 
718 M=T:«=IKT (R 

6Hli28)<l:X=2:R 

ET 
728 PRT :IF»t=""iX 

=5 
738 KBIT 7:F0R 2=1 

TO 6 
746 PRT CSR e:"«ISS 

"1CSR 14:111 
758 PRT " " 
768 HEXT Z:|l=".":ll 

l=":RET 
778 INP "tOK PffEHOn 
",Ct:RET 



LE LOGICIEL 
DE LA SEMAINE 



Trashman ...sur SPECTRUM 




Pour vos Week-end pluvieux, 
vo«a de quoi passer de bons 
moments Mais de quoi s'agit-;i' ? 
Si vous n'avez pas deja bondi 
sur votre dictionnaire anglais- 
(rancais. TRASHMAN veul dire 
ecoueur!... 

Et oui, le jeu consiste a vider ies 
poubelles de celebres rues pari- 
s*enr>es en un temps minimum. 
Quelle difficulty aitez-vous me 
retorquer? Aucune. mis a part 
ies voitures pilotees par de veri- 
tab!es chauffards, ies cyciistes 
orcuiant sur Ies trottoirs. !es pe- 
louses a respecter, ies chiens 
agressifs. 

AJors. comment sen sortir? 
Lorsque vous avez vide une 
poubeile et que vous I'avez soi- 
gneusement rangee la ou vous 
I'avez pnse. la propnetaire vous 
oftre le spectrum de son fils (un 
obsede. parait-iN). vous donne 
un pourboire, vous presente son 



ZX etendu a quatre mega- 
octets... 

Pourquoi se latiguer a retourner 
sur ses pas? Bonne question! 
Chaque cadeau genereusement 
of*ert vous permet de gagner un 
stock de points appreciable. Ces 
pomts viennent se rajouter a 
votre bonus (au depart a 250). A 
chaque seconde ecouiee, vous 
en perdrez, d'ou la rapidite obii- 
gatoire pour accomplir votre 
mission! 

Dernier point essentiel, votre 
employeur vous accorde trois 
essais avant de vous licencier. 
Mors soyez plus rapide que 
votre ombre, sinon... 
Bon ramassage...Et n'oubliez 
jamais que si vous etes ecras6 
durant votre service, votre veuve 
ne touchera pas de pension! 

Michael 



PETITES ANNONCES 
GRATUITES 



VENDS ZX 81 (04*84) + 2 livres 
+ K7 + nombreux programmes 
600 F. Monsieur BOULLEAU 49 
rue Andre Theurtet 93600 AUL- 
NAY SOUS BOIS. Tel: 869 55 
74 (apres 19H). 

VENDS Ordinateur de poche PB 
100 + Irvres d'initiation + inter- 
face K7 + extension memoire ♦ 
diverses revues. (Valeur 1400 
F.J vendu 900 F. Valery BAU- 
DOIN 10 rue sous la Roche Fro- 
tey 70000 VESOUL. Tel: (84) 75 
09 12. 

VENDS ZX 81 + divers pro- 
grammes sous garantie. 480 F. 
Michel ESCRIBANO Tel: 867 16 
45. 

VENDS TI99/4A + Cables * 
manertes de jeu + livres pro- 
gramme + munchman + Parsec 
+ Tl Invaders + alpineer: 1800 
F. F.DAGUET 8 avenue 
R.Garros 78140 VELIZY. Tel: 
(3) 946 02 60. 

VENDS HP 41C bon etat + ma- 
nuel d'utilisation : 900 F. pascal 
LEPRINCE 21 rue Albert Camus 
76550 OFFRANVILLE. Tel: (35) 
85 24 38. 

VENDS pour TI99/4A 2 modules 
de jeu: Tl Invaders : 160 F. + 
jeu de labyrinthe avec plus de 
100 variations: 130 F. + 1 K7 
de jeu (simulation de vol spatial 
avec 25 tableaux) : 50 F. Ou le 
tout 300 F. Pierre BRUEL Ville- 
neuve Ies avignons Cassage 
des Recollets 30400. Tel: (90) 
25 38 17. 

VENDS ZX 81 + 16 K + Clavier 
A8S (1983) + K7 et Program- 
mes sur listing : 750 F. Interlace 
jeu + manettes: 300 F. D. 
BESSE 12 rue du Sergent Magi- 
not 75016 PARIS. Tel: 502 11 
33 poste 3048. 




^^ 



VENDS interlace parallele pour 
im prim ante, Video Genie Sys- 
teme EG 3016 ; 150F. Recher- 
che programmes traitant sur la 
3P et pour imphmante GP 80. 
Jean Luc PERNOT 101 rue de 
St Thierry 51100 REIMS. 

ACHETE 50F. Technique de la 
programmation des jeux" n" 1 
pour TI99/4A. Patrick VOLTO 3 
allee de Quebec 33600 FER- 

SAC. Tel:(56)36 55 51. 

ZX SPECTRUM 48K Echange 
Vends et Achete logiciels pro- 
grammes. VENDS initiation au 
langage assembleur ; 100 F. 
Recherches revues anglaises 
sur le Spectrum. D. LEYNAUD 
Tel: (76) 31 64 07. 

VENDS extension 3K Ram pour 
VIC 20 (valeur 350 F.) vendu 
200 F. Wladimir SKONIECZNY 
24 rue de la Maurienne 59140 
DUNKERGUE. 

VENDS T07 (3/84) + Memo 

Basic + magneto + maneite + 
L7 Basic + Chasseur Omega + 
Startreck + 4 iivres + program- 
mes sur K7.: 4000 F. Michel 
DUBORD Tel (62) 05 31 66. 

VENDS pour T07 FLOPPY 
avec contrbleur: 2500 F + Ex- 
tension 16K : 300 F. + basic 
200 F. + imphmante Centronic 
737 2 avec cable et interlace 
2000 F. Tel: 603 30 49. 

VENDS pour TI99'4A module 
basic etendu neuf importe USA. 
prix; 1100 F. Monsieur LEGROS 
Tel: 981 07 11. 



VENDS Tl 99 4A avec Perrtel - 
bas>c Entendu module + ma- 
gneto Texas + K7 apprendre le 
Basic + jeu PARSEC. Tresor ts 
Land. + Nombreux jeux sur K7. 
Alain FONSECA Tel: (93) 07 52 
66 (I'apres midi). 

VENDS ou echange program- 
mes K7 TI99 4A Michel LE- 
LOIRE 1408 rue de Calonne 
62350 ROBECQ 

RECHERCHE pour TI99 4A tout 
jeu d'aventure. Arnaud MELESE 
128 rue Brancas 92310 
SEVRES. Tel: 626 14 15. 

VENDS T199-4A (1283) et ma- 
gneto sous garantie etat neut ♦ 
2 cordons K7 - joysticks * mo- 
dule Echec, Parsec + 5 livres et 
5 K7 + revues. ( vale urs 3600 F.) 
Vendu 2950 F. J.M, BARBERA. 
Tel: (91) 79 78 18. 

VENDS PC 2 TANDY 11/83 : 

1500 F, Eugene ZIMNY Tel: 
(21)66 88 38. 

VENDS MATTEL* 11 K7 sont 
Donjons et Dragons, Q BERT... 
Prix a debattre. laurent DEVOS 
Tel: (92) 77 64 35 

ECHANGE ou VENDS jeux pour 
COMMODORE 64 WAYDOR 
(VTR), SRAMBLE ET HEXPERT 
(ANIROG). 90 F. Chaque (port 
compris). VENDS pou VIC 20 
cartuches : PROGRAMMERS 
AID: 200 F, ET JUPITER LAN- 
DER: 150 F, Francis MOU- 
THAUD 13 rue des Hortensias 
87100 LIMOGES. Tel: (55) 37 
78 73. 
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LA REGLE A CALCUL 

sort une extension memoire 32 K exterieure pour la console Tl 99/4. 

Avec 48 K ram, vous allez reallserdes programmes plus performants, 

utiliser le logo II (en francals), 

outll indispensable a I'eveil Informatjque des eleves. 



199/4 

Modulates SECAM France 
Modulateur SECAM KJC 
Moduiateur SECAM GH 
CAMe liaison magntto-caMetlM 
Pa»e manetteijeu» 
Uw«o<«!«in compatible 
9ADOIA + CA* Comoro 
Magneto-casiettes compacwe 

LANSAY * rjrje CtfTWB 

• PROG RAMMA DON SUR DrSOUETTES 

CxteP carie [necen Pascal) 
•UCSD foot Compter 
•lX5D?3VJ*\jr*:er 
'lX3DFfesulEcMor 

"impnmante n 99/< par tertmnx 
•FiChWT a'sare-.-jr, 
"Arte 3 la programmaoon 2 
•Aifle 3 la ptoqrammation J 




Extension 32 K 
TI-LOGO H 



1800.00 


D 1 


600.00 


n 


600.00 


n 


600,00 


1 1 


3 000.00 


1 1 


415.00 


i i 


206.00 


n 


206.00 


u 



} 1.995 Fd 



Texas Instruments 



•Eleonciie 

*»fiillance Or. materiaui 

*Mam#maoc|oei 

TJU i--.inec«M<reOepiMietJer 
le t»PUer tfenemon PHP 1200 H 
le fonr/Oleur <ie dnoueitn phu I'umti 

■:•■■■: ■-■,..,.. 



1 375.00 


n 


375.00 


M 


252.00 


11 
1 



Othe*> 
• fViee 

Theanack 
T)-ifft'a<Jef5 
Jeuxvid*ol 
JeunwJeol 



206.00 


n 


252.00 


i : 


147.00 


i I 


206.00 


11 


147.00 


ii 


147.00 


i I 


147,00 


n 


147,00 


1 1 


147,00 


1 1 



MEBDOGKLIELS SOFTWARE 

n N° 1 Bjw umpte K7 I2jeui 

rifv/ 1 ? Bavc etendu : 12 jeui 

n Rijtm vt.it Jeu d'aventurn bavt etendu 



MOOULESROMOX 

Rot ot Raiders 
Men Pecked 
PrinceM and troq 



150.00 




ISO.OO 


□ 


90.00 


1 ! 



390.00 


i : 


390,00 


1 1 


390.00 


ii 


390.00 


D 



HtOGRAMMATlON 

• Extended basic en e 

MSnoff erterfjon ii Kr.ier-rurp 

TILOGOB 

lenterKion 37 K >nde,penMble] 

8auc par v>-meme 

A»de a la p'oq'ammarmn 





752,00 


'1 


Drmonatwtk 


257.00 


F 1 


Math 


252,00 


[1 


Buf get ome 


752.00 


11 





752.00 


11 


5taitiec)> 


252.00 


1 1 


Jawbreaker 


2^2.00 


I 1 


Uand 


252.00 


! ) 



MOtXJLES FUNU/ARE 
Rabbit wad 

g Dmon 



Drtving Droc 
AmbuUnce 



2B5.O0 


n 


285.00 


1 1 


285.00 


1 1 


285.00 


n 


785,00 


u 



ORGAMSATrOrV 

Comal financier 
GeMton fichier 
GeKton rapporu 
SutHOu 
ncaK 

Oe«ionpnver 
MOOULE3 EDUCATION 
AdrJmorvVJtnnacuon I 
AddJUorvSucKtr action I 
Addnion- Canon 
Onmion - demolition 

I |f ■'.■-:,.. i 
Meteor multipkuoon 

^MdpBcidon ■ 

• l MuucM.it" 
MOOUIES LOIS1R5 



Mur 






75.00 


n 


375.00 


1 1 


375.00 


1 i 


20400 


1 1 


415.00 


i ; 


415.00 


u 


147.00 


n 


147.00 


1 1 


147,00 


i j 


147.00 


1 ; 


147,00 


1 1 


147,00 


i i 


147.00 


r i 


206.00 


ii 


147.00 


n 


252.00 


1 1 



PROGOAMMES MAGNARO 

La pnnctuation en F r.mc..m 
Drvneun PGCO - FPCM 



PROGRAMMES VIR NATHAN : 
OrottematKirirte 
Comp rtmufl 
Mori cronei vol I 

Moo cmrtei vrii 2 



PROGRAMMES COUJNS/TEXAS . 

Iritrod au II99/4|I| 

Introd au n 99/4 |2) 

Lrt tecnnKjtun dr^ programmes 

deieu.tlj 

I r~. irrmqtm an prograniriiei 

dCJeui u\ 



175.00 


n 


125.00 


n 


iasjx 




125.00 


1 1 



I 2S2.0O | n I 
Un EatMteUX jr<> d'.w<.w)ei niterg.iiartjgiiei fn cvlntr autrrni i)r 
Satijrne voiji vtun hevricr an u.irtteau enneim 






75.00 




NOUVEAU 
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MOON PATROL • DEFENDER 
Atarieoft au service de Texas 






Le module : 350 F TTC. 





LOGO II en francais : Module enflchable 
Ce langage destine auxjeunes fait com- 
prendre la phllosophle informatlque 
tout en lalssant a leleve la maitrlie de 
londlnateur par lobllgation dc lul don- 
ner des Informations complements! res a 
votre demande. 

Mathematlques et autres disciplines 
d'enselgnement peuvent etrc abordees 
d'une manlere naturelle. 
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f« 375 6B88- lele. tIRAV 770064 l/llill IM. 
llvr*l>on Un produm dhponJbto* tout Ikwn. 



